求助实时错误13类型不匹配 - vb吧

level 1

张桂琴呢楼主

2024年06月29日 04点06分 1

level 1

张桂琴呢楼主

做一个特殊计算器，填写数值能正常计算，不填写任何数字时候点计算就报错，程序结束

2024年06月29日 04点06分 2

level 15

文本框中的内容是字符串，空文本框的内容就是空串，空串不能转换成数值，自然报错
为了避免报错，可以使用Val函数进行转换

2024年06月29日 05点06分 3

感谢，是val（）这个吗，用了还是报错呢

2024年06月29日 06点06分

@张桂琴呢你是这么改的么：Text3=Val(Text2.Text)/0.02-Val(Text2.Text)/Val(Text1.Text)*100

2024年06月29日 06点06分

@初音✨七奈是这样的现在是错误6，变量我都没添加，我再看看视频教学，感谢了

2024年06月30日 00点06分

@张桂琴呢刚反应过来，这是除数为0了啊，至于为啥报的是溢出错误，是因为被除数也是0，VB6只有在非零值除以0的时候才会报“除数为0”错误；你有必要加个判断，如果Text1里面的数是0，就不进行计算，而是MsgBox给出提示

2024年06月30日 04点06分