ROSTAM2
شنبه 15 مهر 1402, 10:11 صبح
در این آموزش متن آیتم های منو در Design عدد تعیین شده که در RunTime به متن تبدیل می شه...
https://aparat.com/v/vBJxP
154997
Sub SetMemuItemTexts(coll As ToolStripItemCollection)
For Each Item As ToolStripItem In coll
If TypeOf (Item) Is ToolStripMenuItem Then
Item.Text = My.Resources.ResourceManager.GetString(Item.Text)
SetMemuItemTexts(DirectCast(Item, ToolStripMenuItem).DropDownItems)
End If
Next
End Sub
https://aparat.com/v/vBJxP
154997
Sub SetMemuItemTexts(coll As ToolStripItemCollection)
For Each Item As ToolStripItem In coll
If TypeOf (Item) Is ToolStripMenuItem Then
Item.Text = My.Resources.ResourceManager.GetString(Item.Text)
SetMemuItemTexts(DirectCast(Item, ToolStripMenuItem).DropDownItems)
End If
Next
End Sub