题目内容:
下面程序用来计算:
Private Sub Command1_Click( )
A = Val(Text1. Text)
B = Val (Text2. Text)
Select Case A
Case 【11】
N=A+B
Case Is = 5
N = B/A
Case Is<5
N=0
End Select
Text3. Text = N
End Sub
参考答案:
答案解析:
下面程序用来计算:
Private Sub Command1_Click( )
A = Val(Text1. Text)
B = Val (Text2. Text)
Select Case A
Case 【11】
N=A+B
Case Is = 5
N = B/A
Case Is<5
N=0
End Select
Text3. Text = N
End Sub