Salve a tutti
Ho un problema con l'oggetto dropdownlist.

Eseguo il codice di seguito riportato ma mi da il seguente errore
"INDICE OLTRE I LIMITI DELLA MATRICE"

No riesco a capire l'errore

Al momento che apro la pagina mi dovrebbe caricare i dati e quindi riempire l'oggetto

Private Sub ListGruppo_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListGruppo.Load


Dim objCmd As New SqlCommand("SELECT gruppo FROM DOC GROUP BY gruppo ORDER BY GRUPPO", ObjCnn)
Dim objR As SqlDataReader = objCmd.ExecuteReader
Dim firstrow As Boolean = True
Do While objR.Read
ListGruppo.Items.Add(New ListItem(objR(1).ToString()))
'If firstrow Then
' TxtData.Text = objR(5).ToString()
' 'txtCategoryDescription.Text = objR(2).ToString()
' firstrow = False
'End If
Loop
'End While
objR.Close()

End Sub

grazie