Differenze tra le versioni di "Individuare con quale tasto del mouse si è cliccato in una cella della GridView"
Da Gambas-it.org - Wikipedia.
| Riga 20: | Riga 20: | ||
<FONT Color=gray>' ''oppure anche così:'' GridView1[GridView1.Row, GridView1.Column].Text = "Tasto Destro"</font> | <FONT Color=gray>' ''oppure anche così:'' GridView1[GridView1.Row, GridView1.Column].Text = "Tasto Destro"</font> | ||
End Select | End Select | ||
| − | + | ||
| − | GridView1.Columns[GridView1.Column].Width = -1 <FONT Color=gray>'</font> <SUP>[[[#Note| | + | GridView1.Columns[GridView1.Column].Width = -1 <FONT Color=gray>'</font> <SUP>[[[#Note|nota 1]]]</sup> |
| − | + | ||
| − | + | End | |
=Note= | =Note= | ||
| − | [1] Vedere questa pagina: [[ | + | [1] Vedere questa pagina: [[Adattare automaticamente l'altezza e la larghezza di una cella di una GridView al testo contenuto]] |
Versione attuale delle 05:03, 23 lug 2023
Per individuare con quale tasto del mouse si è cliccato in una cella di una GridView, è possibile utilizzare questo semplice codice:
Public Sub Form_Open()
With GridView1
.Columns.Count = 10
.Rows.Count = 25
End With
End
Public Sub GridView1_MouseUp()
Select Case Mouse.Button
Case 1
GridView1.Current.Text = "Tasto Sinistro"
' oppure anche così: GridView1[GridView1.Row, GridView1.Column].Text = "Tasto Sinistro"
Case 2
GridView1.Current.Text = "Tasto Destro"
' oppure anche così: GridView1[GridView1.Row, GridView1.Column].Text = "Tasto Destro"
End Select
GridView1.Columns[GridView1.Column].Width = -1 ' [nota 1]
End
Note
[1] Vedere questa pagina: Adattare automaticamente l'altezza e la larghezza di una cella di una GridView al testo contenuto
