登入窗口的一个小问题， UserName = ""表示什么

--------------------编程问答-------------------- 还有帮忙解释下这两行代码的含义
    SaveSetting App.Title, "Settings", "user_name", Trim(txtUserName.Text)
    txtSql = "select * from 用户信息表 where 用户名称= '" & txtUserName.Text & "'"
    If rs.State Then rs.Close
    rs.Open txtSql, CN, adOpenStatic, adLockOptimistic --------------------编程问答-------------------- 就你的代码来说UserName只出现了一次，而且再没用到，看不出有什么用。你看它是否定义在窗体成员，或者全局变量中，有没有别的用处。

SaveSetting把当前的用户名存入注册表，这样程序下次启动，就可以记忆用户名。

txtSql = "select * from 用户信息表 where 用户名称= '" & txtUserName.Text & "'"在数据库中查询指定的用户
If rs.State Then rs.Close 如果之前结果集没有关闭，那么先关闭
rs.Open txtSql, CN, adOpenStatic, adLockOptimistic 执行查询，将查询结果装入结果集 --------------------编程问答-------------------- 我不解的是我都找不到有定义UserName这个变量，怎么编译的时候不会出错 --------------------编程问答-------------------- 你在模块的开头加上
option explicit再运行，看看

补充：VB ,  基础类