vb出现了“未找到方法或数据成员”错误，怎么修改啊，求教高手

Private Sub cmdAdd_Click()
Dim strSql As String
Dim rs As New ADODB.Recordset
Dim strQx As String

If Trim(txtUser_id.Text) = "" Then
MsgBox "用户名不能为空，请重新输入！", vbOKOnly + vbExclamation, "警告"
txtUser_id.Text = ""
txtUser_id.SetFocus
Exit Sub
End If

If Trim(txtUser_pwd.Text) = "" Then '此时.Text标示出错误
MsgBox "密码不能为空，请重新输入！", vbOKOnly + vbExclamation, "警告"
txtUser_pwd.Text = ""
txtUser_pwd.SetFocus
Exit Sub
End If

If Trim(txtUser_pwd.Text) <> Trim(Text1.Text) Then
MsgBox "两次输入得密码不相同，请重新输入！", vbOKOnly + vbExclamation, "警告"
txtUser_pwd.Text = ""
txtUser_pwd.SetFocus
Exit Sub
End If

If Option1.Val

VB未找到方法或数据成员 vb中出现未找到方法或数据成员是什么问题？ 急求高手解决，VB程序出现“未找到方法或数据成员”提示 "未找到方法或数据成员"VB提示 急！！！VB提示“未找到方法或数据成员” vb 未找到数据成员或方法 combo Help！！！VB提示“未找到方法或数据成员” 未找到方法或数据成员 求助.在用VB编程时,提示"未找到方法或数据成员" 请VB高手看看这一断 它提示是未找到方法或数据成员