UC知道请问哪个可以给我一段用VB6编写计算器的代码?,我自己编的运行不了,我自学的,所以好多都不懂哦
来源：百度知道 编辑：UC知道 时间：2024/06/05 14:57:20
我改这样也是显示不了啊得数,还有,除法那里是不是也错了啊?帮帮忙,可以给个改正确的给我看看吗?
Option Explicit
Private Sub Command1_Click()
lable5 = Val(test1) + Val(test2)
End Sub
Private Sub Command2_Click()
lable5 = Val(test1) - Val(test2)
End Sub
Private Sub Command3_Click()
lable5 = Val(test1) * Val(test2)
End Sub
Private Sub Command4_Click()
lable5 = Val(test1) / Val(test2)
End Sub
Private Sub Command5_Click()
Unload Me
End Sub
Option Explicit
Private Sub Command1_Click()
lable5 = Val(test1) + Val(test2)
End Sub
Private Sub Command2_Click()
lable5 = Val(test1) - Val(test2)
End Sub
Private Sub Command3_Click()
lable5 = Val(test1) * Val(test2)
End Sub
Private Sub Command4_Click()
lable5 = Val(test1) / Val(test2)
End Sub
Private Sub Command5_Click()
Unload Me
End Sub
给你说说你代码里面的错误
Option Explicit
Dim test1, test2, lable5
Private Sub Command1_Click()
lable5 =val(test1) + val(test2)
End Sub
如果改成lable5 =val(text1) + val(text2) 的话就不需要
Dim test1, test2, lable5这句，如果要这句的话（label5不用声明，声明了就成变量了，就和控件label5没任何关系了），那么再加两句
test1 = text1
test2 = text2
不然的话你代码里面的test1 就和你的控件text1没有任何联系，
见：
http://zhidao.baidu.com/question/14053457.html
http://iask.sina.com.cn/b/2103274.html
有http://www.vcfan.com上下载的原代码压缩文件。
最好不要把lable,text,command声明为变量
那很容易出错，你的代码中就把标签，文本框与变量搞混了
看书.找资料然后自己慢慢探索吧,相信你能成功,其实这并不难啊!