.......Untuk mudahnya, kamu mesti buat satu menu pada saat design, dengan property sbb:Caption = MenuTmpName = VarMenuIndex = 0Visible = False (hilangkan tik pada checkbox visible)untuk membuat menu lakukan rutin seperti berikut:Dim NamaMenu
NamaMenu = Array("&File", "&Edit", "&View", "E&xit")For x = 1 To UBound(NamaMenu)Load VarMenu(x)
mnuFilesList(x).Caption = NamaMenu(x)mnuFilesList(x).Visible = True
Next xmnuFilesList(0).Visible = FalseMembantu
Yahoo! Mail
Use Photomail to share photos without annoying attachments.
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
