A dire il vero non ho ben capito cosa ti serve(qual è la freccia di cui parli?)
Hai utilizzato il metodo fill?
OleDbDataAdapter1.Fill(DataSet1)
Ps. non so se è una mia impressione ma usando dataAdapter, DataSet... mi rallenta un pochino, prova ad utilizzare anche questo metodo:
codice:
Dim m_cmd As OleDb.OleDbCommand
Dim m_reader As OleDb.OleDbDataReader
Try
m_cmd = OleDbConnection1.CreateCommand
m_cmd.CommandText = "SELECT DISTINCT categoria FROM categori WHERE categoria <> ''"
OleDbConnection1.Open()
m_reader = m_cmd.ExecuteReader
While m_reader.Read
categoria.Items.Add(m_reader.GetString(0).ToString)
End While
m_reader.Close()
Catch
MsgBox("Si è verificato un errore durante la creazione dell'elenco delle categorie" & vbCrLf & Err.Description, MsgBoxStyle.Critical, "Errore " & Err.Number)
Finally
OleDbConnection1.Close()
End Try
Fammi sapere la tua scelta. Magari smentitemi sulla lentezza dell'utilizzo di DataAdapter e Dataset
Ciao