Question

VB中代数式的计算怎么做?

以下是我的代码 却一直输出不了我想要的值
Private Sub Command1_Click()
Dim A, B, C, D, E, F As String

A = Text1.Text
B = Text2.Text
C = A + B
D = A - B
E = C / D
Text3.Text = E
End Sub

Answer 1

将

A = Text1.Text

B = Text2.Text

改成

A = Val(Text1.Text)

B =Val( Text2.Text)

Answer 2

你最好把数据定义成浮点型和整形，才能计算出正确的结果。