Ciao
non capisco cosa sbaglio

ho questa connessione a db sql contente gli utenti e pw per il login al mio programma, ho voluto miglirarlo impendendo l'accesso ad alcune funzioni a chi non avesse gli accessi di amministratore.
Tutto funziona, ma per prova ho messo una Msbox che mi restituisce il contenuto di "selectadministrator", ma invece di restituirmi SI o NO (come memorizzato all'interno del DB, nel campo administrator), mi scrive:
"SELECT Administrator FROM [User] WHERE ID = '" &1 (2 .. 3 .. in base al login inserito)
li DB è

ID Username Password Administrator
1 Mario Rossi SI
2 Marco Bianchi NO
3 Gianni Verdi SI

Private Sub ButtonOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonOK.Click
Dim connection As New SqlClient.SqlConnection
Dim command As New SqlClient.SqlCommand
Dim adaptor As New SqlClient.SqlDataAdapter
Dim dataset As New DataSet
Dim selectadministratorsql As New SqlClient.SqlCommand
Dim selectadministrator As String


connection.ConnectionString = ("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirector y|\Members.mdf;Integrated Security=True;User Instance=True")
command.CommandText = "SELECT * FROM [User] WHERE Username= '" & TextBoxUtente.Text & "'AND Password='" & TextBoxPassword.Text & "';"

connection.Open()

command.Connection = connection

adaptor.SelectCommand = command
adaptor.Fill(dataset, "0")


Dim count = dataset.Tables(0).Rows.Count


selectadministratorsql.CommandText = "SELECT Administrator FROM [User] WHERE ID = '" & count
.
.
.
.

Sapete aiutarmi
Ciao