Visual Basic Popup Menü Nasıl Yapılır

Visual Basic Popup Menü Nasıl Yapılır

Öncelikle Menü Editör ile bir Menü oluşturun.

Asagidaki gibi:

Button Menu (Menu name: mnuBtn, Visible: False - Unchecked)
....SubMenu Item 1 (Menu name: mnuSub, Index: 0)
....SubMenu Item 2 (Menu name: mnuSub, Index: 1)
....SubMenu Item 3 (Menu name: mnuSub, Index: 2)
....SubMenu Item 4 (Menu name: mnuSub, Index: 3)

bir tane de command button hazırlayın ve aşağıdaki kodu yerleştirin.

Private Sub mnuSub_Click(Index As Integer)
Call MsgBox("Kliklenen menü: " & Index + 1, vbExclamation)
End Sub

Private Sub Command1_Click()
Call PopupMenu(mnuBtn)
End Sub

Not: Isterseniz daha güzel bir etki için "Call PopupMenu(mnuBtn)" çağrısı yerine

Call PopupMenu(Menu:=mnuBtn, X:=Command1.Left, Y:=Command1.Top + _Command1.Height)

veya

Call PopupMenu(mnuBtn, vbPopupMenuCenterAlign, Command1.Left + _(Command1.Width / 2), Command1.Top + Command1.Height)

kullanabilirsiniz.

What's Your Reaction?

like
0
dislike
0
love
0
funny
0
angry
0
sad
0
wow
0