Differenze tra le versioni di "Eliminare una riga da una GridView"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "Se si vuole eliminare la riga, sulla quale si è cliccato, da una ''GridView'', è possibile utilizzare il seguente codice: '''Public''' Sub GridView1_Click() GridView...")
 
 
(Una versione intermedia di uno stesso utente non è mostrata)
Riga 1: Riga 1:
Se si vuole eliminare la riga, sulla quale si è cliccato, da una ''GridView'', è possibile utilizzare il seguente codice:
+
Se si vuole eliminare l'<U>ultima</u> riga di una ''GridView'', si può utilizzare la seguente istruzione:
 
+
  Public Sub GridView1_Click()
  '''Public''' Sub GridView1_Click()
 
 
    
 
    
 +
  Dec GridView1.Rows.Count
 +
 +
End
 +
Se invece si vuole eliminare la riga, <U>sulla quale si è cliccato</u>, da una ''GridView'', è possibile utilizzare il seguente codice:
 +
Public Sub Form_Open()
 +
 +
  With GridView1
 +
    .Rows.Count = 10
 +
    .Columns.Count = 5
 +
    For r As Byte = 0 To .Rows.Max
 +
      For c As Byte = 0 To .Columns.Max
 +
        GridView1[r, c].Text = r & "-" & c
 +
      Next
 +
    Next
 +
  End With
 +
 +
End
 +
 +
 +
Public Sub GridView1_Click()
 +
 
   GridView1.Rows.Remove(GridView1.Row, 1)
 
   GridView1.Rows.Remove(GridView1.Row, 1)
 
+
  GridView1.Refresh()
+
  End
 
 
  '''End'''
 

Versione attuale delle 16:26, 13 dic 2023

Se si vuole eliminare l'ultima riga di una GridView, si può utilizzare la seguente istruzione:

Public Sub GridView1_Click()
  
 Dec GridView1.Rows.Count

End

Se invece si vuole eliminare la riga, sulla quale si è cliccato, da una GridView, è possibile utilizzare il seguente codice:

Public Sub Form_Open()

 With GridView1
   .Rows.Count = 10
   .Columns.Count = 5
   For r As Byte = 0 To .Rows.Max
     For c As Byte = 0 To .Columns.Max
       GridView1[r, c].Text = r & "-" & c
     Next
   Next
 End With

End


Public Sub GridView1_Click()

 GridView1.Rows.Remove(GridView1.Row, 1)

End