¿Como contar resultados select, OLDB?

[RootK]

tienes varias formas

1.- hacer directo un COUNT con EXECUTENONQUERY
consulta = New OleDb.OleDbCommand("SELECT count(*) FROM grupos", con)
dim Total as Integer = CType(consulta.ExecuteNonQuery(), Integer)

2.- Colocar un contador en tu ciclo

Dim total as Integer = 0;
While (reader.Read())
Me.listGrupos.Items.Add(reader.GetString(1))
total = total + 1
End While

3.- Si lo estás guardando en un objeto puede ocupar su propio método para saber el total, para tu caso sería:

Dim total as Integer = Me.listGrupos.Items.Count

4.- En vez de ocupar un objeto reader puedes ocupar un Datatable y hacer un count de las rows que regresó

Ya depende de tí cual deseas ocupar y en que caso aplique

Salu2