高考问答3d全息成像:VB初学者的提问
来源：百度文库 编辑：高考问答 时间：2024/05/05 00:52:51
我是VB菜鸟,我想帮一个很简单的算术运算的,但就是做不对,是这样的:
我做了四个text,分别是text1(0),text1(1),text(2),text1(3)分别赋给a,b,c,d,我想a=b/(c*d),我的代码是这样的
Private Sub Form_Load()
dim a,b,c,d
a=text1(0)
b=text1(1)
c=text1(2)
d=text1(3)
a=b/(c*d)
end sub
但一运行它老是提示我"运行类型不匹配"这是怎么回事?怎么要怎么做
不好意思,我试了两位的答案,可它还是提示我"类型不匹配"呀
我做了四个text,分别是text1(0),text1(1),text(2),text1(3)分别赋给a,b,c,d,我想a=b/(c*d),我的代码是这样的
Private Sub Form_Load()
dim a,b,c,d
a=text1(0)
b=text1(1)
c=text1(2)
d=text1(3)
a=b/(c*d)
end sub
但一运行它老是提示我"运行类型不匹配"这是怎么回事?怎么要怎么做
不好意思,我试了两位的答案,可它还是提示我"类型不匹配"呀
Private Sub Form_Load()
dim a,b,c,d
text1(0)=a
b=text1(1)
c=text1(2)
d=text1(3)
a=b/(c*d)
end sub
a是最后显示的结果 你把text1(0)赋给它干什么...要把a的值赋给text1(0)
我没仔细看 总觉得哪还有问题....
dim a,b,c,d as double
a=cdbl(text1(0) )
b=cdbl(text1(1) )
c=cdbl(text1(2) )
d=cdbl(text1(3) )
a=b/(c*d)
text1(0).text = a
end sub
应该在变量定义中说明a.b,c,d的类型。如果不声明，则默认为可变型。