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

Da Gambas-it.org - Wikipedia.
 
Riga 1: Riga 1:
Se si vuole eliminare l'<SPAN Style="text-decoration:underline">ultima</span> riga di una ''GridView'', si può utilizzare la seguente istruzione:
+
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
 
   Dec GridView1.Rows.Count
 
   
 
   
  '''End'''
+
  End
Se invece si vuole eliminare la riga, sulla quale si è cliccato, da una ''GridView'', è possibile utilizzare il seguente codice:
+
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()
  '''Public''' Sub GridView1_Click()
+
 
+
  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)
 
+
  '''End'''
+
  End

Versione attuale delle 17: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