visualbasic实时错误逻辑错误收集

1、 visual basic 常见错误收集 自己在学习visual basic后，按照课本上的要求经行编程，总是出现这样或那样的错误提示，读不懂就无法修改，于是就有了把这些常见的错误收集起来的想法，几个月下来就积攒了以下错误，有些错误现在很少犯了，但是还有些错误还得需要一段时间才能改正！现在分享给大家希望对你有所帮助，祝学习愉快！ 黄河水利职业技术学院 地理信息0901 杨鹏飞 ypf97586 实时错误13类型不匹配 如a=inputbox("请输入必要的数据","数据输入",0) 为加val就按了取消 如在text中输入文本代码中却要执行加法运算实时错

2、误9下标越界 如定义动态数组 dim a（） as single n=text1.text for i=1 to n a(i)=val(inputbox("输入必要数据","数据输入",0) 出现下标越界的原因就是没有使用redim a(n)重新指定动态数组的数目byref参数类型不符 进行虚实结合时要注意数据类型相同否则会出现 原因就是定义通用过程时形参类型和实参类型不相同编译错误错误的参数号或无效的属性赋值 编译错误未找到方法或数据成员 如text1.text误写成了text1.tex 编译错误缺少：列表分隔符或 ）编译错误缺少语句结束 如&

3、 Str(a(i) "转换后是 显然连接字符串少了一个“&”编译错误无效字符"_和'"直接相连而未放在句尾编译错误子函数和过程未定义 msg 无box 或者引用函数时拼写错误编译错误子程序或函数未定义 本来该分开写的东西不小心并在了一块导致vb无法识别运行 Select Case Button.Index Case 1 Text1.ForeColor = vbBlue Case2 text2.ForeColor = vbRed 编译错误缺少表达式 当书写了本因该完整却为完整的算式时会出现如此提醒 如“&”后未连接“=”无内容但在label和

4、text后点上"."并未经行自行索检，原因所调用的空间根本就不存在 编译错误必选参数 也即是在函数嵌套调用时内部函数忘记了添加实参编译错误语法错误，但是未指定地点 Format(fp(hjd(hd), "0.0000") 少了一个分隔符号 实时错误'424' 要求对象 错误原因本来不存在text2控件，单命令按钮中相关代码却设计了text2实时错误“360”对象已加载？ If a = 0 Then '从未加载到加载 Load size(4) a = 1 'a=1,标识着已用代码加载了菜单 size(4).Visible =

5、 True size(4).Caption = "16" Else Load size(4) '为防止重复加载做准备 实时错误“360” 控件数组（4）不存在 未提示的逻辑错误1 虽然声明了变量，导致计算结果不符合预期检验效果可能使用时拼写错误 编出的程序不符合检验结果 可能是小取大出改为取数时采用高精度（保证数据采集时的质量），输出时采用低精度 计算的结果总算是零，原因是赋值时使用的是一个变量而参与计算时用的却是另一个变量，这种错误总是出现在，相识过程的复制粘贴 计算的结果虽然不是0但其结果很不符合逻辑，可能原因就是相识的过程复制粘贴而计算的函数未进行相应的改变

6、未知逻辑错误 （李永川老师编的度化为度分秒的小程序） 如度分秒换算成小数度形式时采用30.30和60.30换算的结果很不符合逻辑 应注意的问题 定义变量时范围和类型不要混乱 zh(hjd(hd) 函数Public Function hjd(hd As Double) As Single ，实参hd 定义时定义的是single 因此会出现错误 为了保证取数的精度，我们定义实参时采用了双精度，导致调用其实参的函数过程的形参也必须定义为双精度 但是函数的返回值在函数过程中定义的类型，在函数嵌套调用时却不影响 （猜想） 为了增强代码的可读性使用连接符要有一定的格式标准 多重引号套用使vb无法识别要表达的意识是可用str结合着&&来告知 如 "个数据是”& a(i) &“转换后是：" 定义过程命名时要明确，易于理解和记忆，以免出现错误 有时后，误调用了某个函数，但由于巧合，逃过了验证 如zh(hjd(hd) hd=3.1415926 hjd=180 zh采用了格式化结果为180.0000 fp(hjd(hd) hd=3.1415926 hjd=180 pf采用了严格计算结果为180.0000 故出现了错误，