|
-
Jan 27th, 2004, 09:39 PM
#1
Thread Starter
Junior Member
Read all items from a menu
How can I read all the items from a menu which contains several sub-menus? I need to retrieve all the items name from a menu.
Regards,
Calvin
-
Jan 27th, 2004, 10:24 PM
#2
Lively Member
halu,
this might help...
VB Code:
Private mnuCountries As MainMenu
Private mnuItemEuropeNations As MenuItem
Private mnuItemItaly As MenuItem
Private mnuItemGermany As MenuItem
Private mnuItemFrance As MenuItem
Public Sub CreateNationMenu()
' Create instances of global MainMenu and MenuItem objects
mnuCountries = New MainMenu()
mnuItemEuropeNations = New MenuItem("Some Nations of E&urope")
mnuItemItaly = New MenuItem("&Italy")
mnuItemGermany = New MenuItem("&Germany")
mnuItemFrance = New MenuItem("&France")
' Add mnuItemEuropeNations to MainMenu component's MenuItem collection
mnuCountries.MenuItems.Add(mnuItemEuropeNations)
' Add submenus to mnuItemEuropeNations
mnuItemEuropeNations.MenuItems.Add(mnuItemItaly)
mnuItemEuropeNations.MenuItems.Add(mnuItemGermany)
mnuItemEuropeNations.MenuItems.Add(mnuItemFrance)
' Make mnuCountries the form's menu
Me.Menu = mnuCountries
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s As MenuItem
For Each s In mnuItemEuropeNations.MenuItems
ListView1.Items.Add(s.Text)
Next
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
CreateNationMenu()
End Sub
good luck...
i did have a short coding on this... any progress, please let me know... i'm a newbie though.
thanx times ten to the power of forever...
writing hello world is fine but developing large project needs a forum like this...
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|