Ho due GridView di cui una è vuota e l'altra contiene dati, alla pressione di un bottone i dati devono essere copiati nella GridView vuota.
Ho provato con questo codice
PUBLIC SUB Button_Click()
DIM i AS Integer
FOR i = 0 TO GridView1.Rows.Count - 1
GridView2[i, 0].Text = GridView1[i, 1].Text
GridView2[i, 1].Text = GridView1[i, 2].Text
GridView2[i, 2].Text = GridView1[i, 3].Text
GridView2[i, 3].Text = GridView1[i, 4].Text
GridView2[i, 4].Text = GridView1[i, 5].Text
GridView2[i, 5].Text = GridView1[i, 6].Text
GridView2[i, 6].Text = GridView1[i, 7].Text
GridView2[i, 7].Text = GridView1[i, 8].Text
NEXT
END
ma ottengo un bel: Bad row index
la posizione delle colonne è così come l'ho postata.
Come posso fare?
Ciao, non so se hai fatto volutamente per qualche motivo o è un errore, a me mi sembra che non siano allineate le righe
GridView2[i, 0].Text = GridView1[i, 1].Text
mi sembra che dovrebbe essere
GridView2[i, 0].Text = GridView1[i, 0].Text
edit:
No forse ho inteso male io..
Sono proprio così.
Ho corretto il codice in questo modo
PUBLIC SUB Button_Click()
DIM i, k AS Integer
FOR k = 0 TO GridView2.Rows.Count - 1
FOR i = 0 TO GridView1.Rows.Count - 1
GridView2[k, 0].Text = GridView1[i, 1].Text
GridView2[k, 1].Text = GridView1[i, 2].Text
GridView2[k, 2].Text = GridView1[i, 3].Text
GridView2[k, 3].Text = GridView1[i, 4].Text
GridView2[k, 4].Text = GridView1[i, 5].Text
GridView2[k, 5].Text = GridView1[i, 6].Text
GridView2[k, 6].Text = GridView1[i, 7].Text
GridView2[k, 7].Text = GridView1[i, 8].Text
NEXT
NEXT
END
Non mi dà più l'errore, ma la GridView2 non visualizza niente.
Ancora non ci siamo.
PUBLIC SUB Button_Click()
DIM i AS Integer
DIM k AS Integer
FOR i = 0 TO GridView1.Rows.Count - 1
k = i
GridView2[k, 0].Text = GridView1[k, 1].Text
GridView2[k, 1].Text = GridView1[k, 2].Text
GridView2[k, 2].Text = GridView1[k, 3].Text
GridView2[k, 3].Text = GridView1[k, 4].Text
GridView2[k, 4].Text = GridView1[k, 5].Text
GridView2[k, 5].Text = GridView1[k, 6].Text
GridView2[k, 6].Text = GridView1[k, 7].Text
GridView2[k, 7].Text = GridView1[k, 8].Text
GridView2.Refresh
NEXT
END
Così va?
milio ha scritto:
Ma sei sicure che nella GridView vuota ci sia un numero sufficiente di righe?
Se non da più l'errore "out of bound" vuol dire che il numero di righe è già impostato...nel caos non fosse codì basta aggiungere al codice
GridView2.Rows.Count = GridView1.Rows.Count