Differenze tra le versioni di "Modificare il contenuto di una cella di una TableView cliccandoci dentro"

Da Gambas-it.org - Wikipedia.
 
(Una versione intermedia di uno stesso utente non è mostrata)
Riga 1: Riga 1:
Mostriamo un esempio pratico, in cui si clicca all'interno di una cella di una ''TableView'' e se ne modifica manualmente il contenuto:
+
Mostriamo un esempio pratico, in cui cliccando all'interno di una cella di una ''TableView'', si rende possibile modificare manualmente il contenuto:
  '''Public''' Sub Form_Open()
+
  Public Sub Form_Open()
 
+
 
  With TableView1
+
  With TableView1
    .Rows.Count = 3
+
    .Rows.Count = 3
    .Columns.Count = 3
+
    .Columns.Count = 3
  End With
+
  End With
 
+
 
  '''End'''
+
  End
 
   
 
   
 +
Public Sub TableView1_Click()  <FONT Color=gray>' ''Quando si clicca in una cella...''</font>
 
   
 
   
'''Public''' Sub TableView1_Click()  <FONT Color=gray>' ''Quando si clicca in una cella...''</font>
 
 
 
 
  <FONT Color=gray>' ''...si rende modificabile il suo contenuto:''</font>
 
  <FONT Color=gray>' ''...si rende modificabile il suo contenuto:''</font>
  TableView1.Edit
+
  TableView1<FONT Color=#B22222>.Edit</font>
 
 
'''End'''
 
 
   
 
   
 +
End
 
   
 
   
 
  <FONT Color=gray>' ''Rende stabile il nuovo contenuto scritto nella cella cliccata:''</font>
 
  <FONT Color=gray>' ''Rende stabile il nuovo contenuto scritto nella cella cliccata:''</font>
  '''Public''' Sub TableView1<FONT Color=#B22222><B>_Save</b>(Row As Integer, Column As Integer, Value As String)</font>
+
  Public Sub TableView1<FONT Color=#B22222><B>_Save</b>(Row As Integer, Column As Integer, Value As String)</font>
 
+
  TableView1[Row, Column].Text = Value
+
  TableView1[Row, Column].Text = Value
 
+
  '''End'''
+
  End

Versione attuale delle 15:37, 13 giu 2023

Mostriamo un esempio pratico, in cui cliccando all'interno di una cella di una TableView, si rende possibile modificare manualmente il contenuto:

Public Sub Form_Open()
 
 With TableView1
   .Rows.Count = 3
   .Columns.Count = 3
 End With
 
End

Public Sub TableView1_Click()   ' Quando si clicca in una cella...

' ...si rende modificabile il suo contenuto:
 TableView1.Edit

End 

' Rende stabile il nuovo contenuto scritto nella cella cliccata:
Public Sub TableView1_Save(Row As Integer, Column As Integer, Value As String)

 TableView1[Row, Column].Text = Value

End