vb登录判断问题
大家好，我是个菜鸟，刚学习VB，我有一个问题想请教！
我想在VB中用IF语句做判断 ，如果满足quanxian="user"则执行语句（不能执行） 我的数据库sql里字段有username passwoer quanxian
代码如下：
Private Sub cmdOK_Click()
Dim m As String
Dim quanxian As String
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "Driver={sql server};server=niuniu;uid=;pwd=;database=sbgl"
conn.ConnectionTimeout = 30
conn.Open
rs.Open "select username,password,quanxian from 帐号管理 where username='" & Trim(txtUserName.Text) & "' And password ='" & Trim(txtPassword.Text) & "'", conn, adOpenStatic, adLockReadOnly, adCmdText
If rs.EOF = True And rs.BOF Then
m = MsgBox("请重新登录", vbExclamation)
txtUserName.Text = ""
txtUserName.SetFocus
txtPassword.Text = ""
txtPassword.SetFocus
ElseIf rs!quanxian = "user" Then
shouye.Hide
shouye.Show
Unload frmLogin
Else
shouye1.Hide
shouye1.Show
Unload frmLogin
End If
rs.Close
End Sub
VB code:
'password为系统关键字，建议不要作为表名与字段名使用，一定要用则需要用方括号
'代码尽量缩进
Private Sub cmdOK_Click()
Dim m A
相关问答：
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
DIM ds as new DataSet
我这样声明 怎老是报 用户定义类型未定义？ 这个需要引用什么吗？？
前提是DataSet对象要存在,就是对象浏览器中有它.没有就要引用.
dataset是ADO.NET对象
如果你用的是vb.net，那么在� ......
如题，VB中如何实现一PC控制N台PC机的开关机或者其他命令呢？
这个问题有点大哦.如不能在其它机器上也装程序的话,那只要看他们有没配置有远程控制开关机了
如果是那种客户/服务端的方式 ，就是被控制PC也需要安� ......
请问一下vb和tc的骗译语问有什么具体的区别。
& ......
