lyt001

我写了以下一段代码
Private Sub cmdOK_Click()-----显示变量未定义
   If txtUserName.Text = "" Then
   MsgBox "请填写用户名", vbOKOnly + vbInformation, "注意"
   txtUserName.SetFocus
   Exit Sub
   ElseIf txtPassword.Text = "" Then
   MsgBox "请填写密码", vbOKOnly + vbInformation, "注意"
   txtPassword.SetFocus
   Exit Sub
   End If
   g_b丽都影视 = True
   If IsExistUser(txtUserName.txtPassword) = True Then
   Unload 丽都影视
   影视俱乐部.Show
   Else
   If IsExistUser(txtUserName, "") = True Then
   MsgBox "密码不正确！请重试~~~~~", vbOKOnly + vbInformation, "错误"
   Else
   MsgBox "无此用户！！！", vbOKOnly + vbInformation, "错误"
   End If
End Sub
而且说是MSDN集合不存在  现在该怎么改啊
cmdOK 是一个command“登陆”按钮

[ 本帖最后由 lyt001 于 2009-3-23 08:32 编辑 ]