[RISOLTO] Copiare dati tra due GridView

[tornu]

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

Codice: [Seleziona]

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?

[Golia]

Ciao, non so se hai fatto volutamente per qualche motivo o è un errore, a me mi sembra che non siano allineate le righe

Codice: [Seleziona]

GridView2[i, 0].Text = GridView1[i, 1].Text

mi sembra che dovrebbe essere

Codice: [Seleziona]

GridView2[i, 0].Text = GridView1[i, 0].Text

edit:
No forse ho inteso male io..

[tornu]

Sono proprio così.
Ho corretto il codice in questo modo

Codice: [Seleziona]

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.

[Ceskho]

Codice: [Seleziona]

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]

Ma sei sicure che nella GridView vuota ci sia un numero sufficiente di righe?

[Ceskho]

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

Codice: [Seleziona]

GridView2.Rows.Count = GridView1.Rows.Count

[tornu]

No Ceskho, ottengo l'errore iniziale "Bad row index".

@milio
Non è un problema di numero righe, che viene determinato dalla variabile.
Non credo comunque che ci sia un "limite" di numero di righe...penso...(porrò il problema in una mia prossima discussione).
Le colonne sono così come le ho postate, perchè la GridView1 deve passare solo alcuni dati che sono in colonne non speculari alle colonne della GridView2.

[tornu]

Ceskho ha scritto:

Codice: [Seleziona]

GridView2.Rows.Count = GridView1.Rows.Count

 :ok:  :ok: Perfettamente funzionante, mancava questa istruzione.
Grazie  :prof: Ceskho.

[milio]

Allora era come dicevo io: il numero di righe non erano sufficienti