机房收费系统（一）

这是我在敲机房的时候遇到的几个小问题，机房还在进行，问题会不断产生，努力去解决！

问题一：

查询窗口不报错但是也不显示查询的内容

错误原因：语句错误。end if写错位置

图为正解

问题二：

一般这种问题不是数据库没连好就是代码有问题，大部分情况是代码有问题。

问题三：实时错误3021    困了我好几天的问题

事实上就是读取不到数据库里的数据，txtSQL那句显示txtSQL是空的。

错误原因：出现此错误有可能是因为:

1.查找的数据库记录为空..可以用 rs.RecordCount 来判断数据是否等于0 

2.查找到数据后,用 Del 命令删除记录后,再引用 Fields 后会出现错误. 

3.已经用MoveFirst 或用 MovePrevious 命令 移动至数据库开始后再用 MovePrevious 命令. 

4.已经用MoveLast 或用 MoveNext 命令 移动至数据库开始后再用 MoveNext 命令.

      但是我的问题就不是这之中的某一个，因为我对于控件或者变量声明的命名太规范死板，导致UserName这个名字被用了很多次，有的被命名成用户名，有的是调用数据库中的数据。所以乱套了，只能为空，就显示的是数据库中查到的内容是空的。这个问题很多同学帮我看了，可能大家没有出过这种蛇精病的问题，感谢小白同学帮我找到问题的根源，同时感谢明慧，博雅，郭老师等同学对我的帮助。