Question

拜托拜托~~VB一个窗体3个文本框，每个文本框填一个数字，然后点击按钮运算这些数字，怎么写？

Private Sub Command1_Click()
Text4.Text = (xau + usd) / 2 * h / 31.1035
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
Dim xau, usd, h
End Sub
Private Sub Text1_Change()
xau = Val(Text1.Text)
End Sub
Private Sub Text2_Change()
usd = Val(Text2.Text)
End Sub
Private Sub Text3_Change()
h = Val(Text3.Text)
End Sub
我不清楚哪里有问题……

Answer 1

这个问题可以这样解决：

1:依次获取三个文本框里面的数字：
dim l1 as integer
dim l2 as integer
dim l3 as integer

l1=val(text1.text)
l2=val(text2.text)
l3=val(text3.text)

2:依次进行你想要的计算。

加法，乘法等等。

dim sum as integer
sum=l1+l2+l3