帮忙看一下这个程序哪错了,为什么出现不了2*a的情况,输入3输出9,输入1输出3,我用的vb系统
问题补充:
Private Sub Command1_Click()
a = Val(Text1.Text)
If a > 10 Then
Text2.Text = 4 * a
Else
If 6 < a < 10 Then
Text2.Text = 3 * a
Else
Text2.Text = 2 * a
End If
End If
End Sub
最佳答案
VB的逻辑表达式与数学上是不一样的,你的
If 6 < a < 10 Then
正确的是
If 6 < a And a < 10 Then
最佳答案由网友 whoami1978 提供
其他回答
暂无其它回答!