ok, lo hago de la siguiente manera:
Código vb:
Ver originalPrivate Function Regresa_Nombres_Botones()
objConn = New SqlConnection(MiConexion.StrConexion)
Dim m As Integer
Dim Lista_Nombres As New List(Of String)
Try
objConn.Open()
'Creo un Adapter
Dim objAdapter As New SqlDataAdapter(Instrunccion_SQL, objConn)
'Creo un DataSet
Dim objDataSet As New DataSet
'Lleno el DataSet con la Tabla
objAdapter.Fill(objDataSet, Tabla)
'Recorro la tabla para ver que no exista un registro con el mismo nombre
For m = 0 To objDataSet.Tables(0).Rows.Count - 1
Lista_Nombres.Add(objDataSet.Tables(0).Rows(m).Item(2))
Next
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
objConn.Close()
End Try
Return Lista_Nombres
End Function
En este caso del resultado de la consulta me interesa la columna 2 que es la que contiene el nombre de mi botón.
Suerte.