VB登陆界面连接数据库运行时密码总是错误？？

Private Sub Command1_Click()
Dim rs As New ADODB.Recordset '用户信息查询记录集
Dim strSql As String '查询字符串分别存放SQL语句代码段
Dim Conn As New ADODB.Connection '声明并创建ADO Connection对象
Dim CurLoginUserNo As String '保存当前登录的用户编号
Dim CurLoginPassWord As String '保存当前登录的用户名称
'设置连接字符串ConnectionString属性
Conn.ConnectionString = "Provider=SQLOLEDB.1; " & _
"Data Source=127.0.0.1; Initial Catalog=ManageClass; " & _
"User ID=sa; Password="

Conn.Open '打开数据库的连接
'数据有效性检查（未输入用户编号，重新输）
If txtuserid.Text = "" Then
MsgBox "请输入用户编号", vbExclamation + vbOKOnly, "操作提示"
txtuserid.SetFocus '用户编号输入框获得焦点
Exit Sub
End If

'从Users表查询指定用户编号的用户信息
strSql = "SELECT * FROM Users WHERE UserN

asp连接数据库的登陆界面问题！！！ 用vb做登陆界面,要求能与数据库相连 vb登陆界面 要调用数据库中的用户名和密码！ ASP实现登陆界面和连接ACCESS数据库 VB登陆界面问题 vb用户登陆界面 VB数据库怎么连接数据库 VB 打包后在本机可以运行 在别的电脑上运行时连接不到数据库 用VB连接数据库 VB如何连接数据库？