Differenze tra le versioni di "Rilevare quale sotto-voce di menu è stata cliccata"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "Per rilevare quale sotto-voce (''item'' ) di un Menu è stata cliccata, è possibile usare il seguente codice: Public Sub Form_Open() Dim Menu1, Menu2, Menu3, Menu4 As Me...")
 
 
(Una versione intermedia di uno stesso utente non è mostrata)
Riga 1: Riga 1:
−
Per rilevare quale sotto-voce (''item'' ) di un Menu è stata cliccata, è possibile usare il seguente codice:
+
Per rilevare quale sotto-voce (''item'') di un Menu è stata cliccata, è possibile usare il seguente codice:
 
  Public Sub Form_Open()
 
  Public Sub Form_Open()
 
   
 
   
 
   Dim Menu1, Menu2, Menu3, Menu4 As Menu
 
   Dim Menu1, Menu2, Menu3, Menu4 As Menu
 
   
 
   
−
   With Menu1 = New Menu(Me)' As "Menu1"
+
   With Menu1 = New Menu(Me)
 
     .Caption = "Menu1"
 
     .Caption = "Menu1"
 
   End With
 
   End With

Versione attuale delle 08:57, 2 lug 2024

Per rilevare quale sotto-voce (item) di un Menu è stata cliccata, è possibile usare il seguente codice: 

Public Sub Form_Open()

 Dim Menu1, Menu2, Menu3, Menu4 As Menu

 With Menu1 = New Menu(Me)
   .Caption = "Menu1"
 End With

 With Menu2 = New Menu(Menu1) As "Mn"
   .Caption = "Menu2"
 End With
 With Menu3 = New Menu(Menu1) As "Mn"
   .Caption = "Menu3"
 End With
 With Menu4 = New Menu(Menu1) As "Mn"
   .Caption = "Menu4"
 End With

End


Public Sub Mn_Click()

 Print Last.Caption

End
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Rilevare_quale_sotto-voce_di_menu_è_stata_cliccata&oldid=37813"