判断的代码如下
dbset.Clear()
MyConnection.Open()
MyCommand1 = New SqlCommand("select login.power from login where login.name='" & TextBox1.Text & "' and login.password=ha", MyConnection)//在这里
dataA = New SqlDataAdapter(MyCommand1)
dataA.Fill(dbset, "login")
MyReader = MyCommand1.ExecuteReader
这里的login.password=ha
我的目的是判断 数据库中password 的值和变量ha的值相等，该怎么写？？

怎么等了一下午也没人啊？ 是不是这种方法行不通啊？ 有比的方法吗？
求助@夜闻香

Public Function SqlDir(ByVal SqlStr As String) As Boolean
Dim Myconn As New SqlConnection(Connstr)
Dim Tmp As Boolean
Dim Comm As New SqlClient.SqlCommand(SqlStr, Myconn)
If Myconn.State <> ConnectionState.Open Then Myconn.Open()
Dim KKc As SqlClient.SqlDataReader = Comm.ExecuteReader
Tmp = KKc.HasRows
KKc.Close()
Comm.Dispose()
Myconn.Close()
Return Tmp
End Function
送你一个函数，这么用：
dim Pos as boolean=sqldir("select login.power from login where login.name='" & TextBox1.Text & "' and login.password=ha")
if pos then
'登陆成功
else
'登陆失败
endif