Aggiungere righe in una GridView da codice mediante un tasto
Da Gambas-it.org - Wikipedia.
Per aggiungere da codice righe di una GridView, si utilizza il metodo GridView.Rows.Insert().
Di seguito mostriamo un esempio, in cui viene aggiunta una riga ad una GridView, ogni qual volta si preme un Button posto sul Form:
Public Sub Form_Open() GridView1.Columns.Count = 1 End Public Sub Button1_Click() GridView1.Rows.Insert(GridView1.Rows.Count) With GridView1[GridView1.Rows.Max, 0] ' Coloriamo di giallo lo sfondo della nuova riga: .Background = Color.Yellow ' Nella nuova nuova riga inseriamo l'attuale numero crescente: .RichText = GridView1.Rows.Count End With End
E' comunque possibile anche usare la Proprietà ".Count" aggiungendo ad essa il numero di righe desiderato:
Public Sub Form_Open() Dim b As Byte With GridView1 .Rows.Count = 4 .Columns.Count = 3 End With For b = 0 To GridView1.Rows.Max GridView1[b, 0].Text = CStr(b) Next End Public Sub Button1_Click() GridView1.Rows.Count = GridView1.Rows.Count + 1 GridView1[GridView1.Rows.Max, 0].Text = CStr(GridView1.Rows.Max) End