مبانی علم رایانه

حالا فرض میکنیم که می خواهیم منو را برای هنگامیکه بر روی فرم راست کلیک کردیم ظاهر کنیم , کد زیر را در Event (ٍرویداد) MouseDown می نویسیم :

 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
   
   'Button = 1 :::>>> For LeftClick
   'Button = 2 :::>> For RightClick
    If Button = 2 Then
        PopupMenu MnuFile
    End If
    
End Sub

حالا برنامه را Run کنید و بر روی فرم راست کلیک کنید می بینید که فرم ظاهر میشود