葫芦娃伴奏曲mp3:还是没有解决,关于VB的极菜问题

最基本的问题是你不该在Load事件中写这些代码！
你在窗体设计时是否已经给几个text添加了默认值？
如果没有，那么Load的时候，text1(0)text1(1)、text1(2)、text1(3)都是空值，则你的表达式a=b/(c*d)就违反了运算规则！！

根据你的需求，你应该把代码写在text1的onchange事件中！

Private Sub Form_Load()
dim a as long
dim b as long
dim c as long
dim d as long
b=clng(text1(1).text)
c=clng(text1(2).text)
d=clng(text1(3).text)
a=clng(b/(c*d))
text1(0).text=cstr(a)
end sub
还有 你写了控件数组那你的界面上也应该是个文本框数组
还有 为什么会是在Form_Load事件里哪

b=text1(1)
c=text1(2)
d=text1(3)
a=b/(c*d)
text1(0)=a
修改为：
b=text1(1).Text
c=text1(2).Text
d=text1(3).Text
a=b/(c*d)
text1(0).Text =a

Private Sub Form_Load()
dim a,b,c,d as Int...
b=val(text1(1).text)
c=val(text1(2).text)
d=val(text1(3).text)
a=b/(c*d)
text1(0).text=str(a)
end sub

Private Sub Command1_Click()
Dim a, b, c, d As Single
b = Text1(1)
c = Text1(2)
d = Text1(3)
a = b / (c * d)
Text1(0) = a
End Sub
加一个按钮。就是Command1，这样只要你输入b,c,d三个输入的数据，按Command1按钮就可以在Text1(0)中显示你的答案。我测试过可以用。

text是字符串，怎么能直接做四则运算呢？要用b=Val(text1(1).Text)这种方法。