Question

Vb6.0 刚开始学编程 这是一个计算器的代码 ，我点击计算时就出现这样的情况 谁知

Vb6.0 刚开始学编程 这是一个计算器的代码 ，我点击计算时就出现这样的情况 谁知道该怎么修改。。

Answer 1

错误百出。
1、首先出错提示是因为除数b为0。为什么b等于0呢，因为b并不是全局变量，只是局部变量（跟text2_change事件中定义的b没有任何关系，同理a,c等都是局部变量），并且你没有赋值，做算术运算时默认是0。
2、所有的a,b,c都是局部变量，你并没有定义成全局变量，所以在各sub中对a,b,c赋值毫无意义，出了sub后，变量已经被回收，并不能用于其他sub。
3、计算按钮的代码完全没有逻辑，你把加减乘除都计算一遍，最后不管怎么样，c的结果都是a/b。你应该根据运算符来分别计算结果。
4、完全没必要用text_change事件，在计算按钮中直接取文本的内容即可。
5、+、-、x、/按钮可以用控件数组来简化代码

追问

我不是把b 定义为integer了吗

追答

在sub中定义，是局部变量，出了这个sub，这个变量就没了

追问

那计算按钮部分是不是得用条件语句？

追答

可以，也可以用select case

追问

这个没学过。。。就学过if then else....

追答

那你就用if语句

追问

command1.2.3.4的代码应该没错吧

你刚才说a.b.c都是局部变量，怎么定义让它们变成全局变量

追答

嗯，没有错。在所有代码的最上面定义变量，就是全局变量。这里好像没必要定义全局变量

Answer 2

初中作业？

追问

无聊随便编写的

追答

按键5写的有问题

追问

要怎么改

追答

c的值，按说要按不同情况进行运算，你这个都写到一起了

追问

是不是得用判断语句？

追答

是，我认为最好再设一个变量来储存运算方式

追问

要怎么弄？

追答

自己想把，别人告诉你就没意思了

追问

。。。。。。。好吧