学生也敲完有一段时间了,错也调的差不多了。
错误很多吗?
多,也不多。说它多是因为每个窗体都有错,说它不多是说他的很多的错误类型就总共分为几个类别。
so,今天的博客就开始吧!
诺,这是第一个错误
第一类:代码类错误
1、 事实错误 91
对象变量或With块变量未设置
解决这里出现的错误91有三种情况
第一、是因为代码错误(本例中不是这种情况)
第二、是因为数据库没有连上需要重新连上(本例是这种情况)所以需要自 己重新连接数据库来解决这个问题
第三、(本例中不是这种情况)在调试过程中,自己代码正确,数据库也连接着,但还是出现下面这种情况:对象变量或with块变量未设置。
这就是SQL注入的问题,王雷师哥博客有很详细的总结,如果大家想了解或遇到这样的问题可以去看看。
链接:http://blog.163.com/m18333602097_1/blog/static/2380930122015322524752
解决这个问题的方法,就是加入一下代码:
Private Sub txtUserName_KeyPress(KeyAscii AsInteger)
If KeyAscii = 39 And 33 Then
MsgBox "是非法字符,请输入合法字符", vbOKOnly +vbExclamation, "警告"
txtUserName.SetFocus
txtPassword.Enabled = False
Else
txtPassword.Enabled = True
End If
End Sub
2、错误及窗体显示部分
错误原因:
出现的原因是因为当时没有添加班级信息,所以在进行修改班级信息的时候出现了这个问题。解决方法就是在mrc.Move First上面添加一串代码如下:
If mrc.RecordCount =0 Then
MsgBox"无记录!", vbOKOnly + vbExclamation, "提示"
Else
3、错误及代码显示部分
代码部分错误显示
错误的原因也是代码错误原因如下:
其实就是代码与所对应的对象的名称不一样,然后自己找到对应的TXT控件发现他的名称为txtDirecto少了一个r导致其无法调用数据
4、这一类也是代码错误。这很大的部分是关于代码与空间的名称不一致
代码部分如下:
改正过后是将蓝色部分的Text1(0)部分改为Text1就行了原因是因为所添加的控件名称与代码的名称不一致,所以导致数据无法调用
总结:其时想说的是要是自己不犯错该多好,自己当时在敲的时候小心一点仔细一点,就会没有错误了,那该有多爽啊!可是转念一想,真要是没有错误还真的是自己的一大损失,错误不怕,怕的是自己没有成长的机会和空间了。