下列代码执行后,窗体上显示()。 Dim a%, b% a=12: b=30 If a>b Then a=a+b Else b=b-a End If Form1.Print b
举一反三
- 下列程序执行后,输出结果是( )。 a=0 : b=1 a=a+b : b=a+b : Print a;b a=a+b : b=a+b : Print a;b a=b-a : b=b-a : Print a;b
- 下列程序段运行后,窗体上显示的结果是Dim x as integerIf x then print 1 else print -1
- 下列代码执行后,窗体上显示( )。 Dim x As Integer, y As Integer x = 50: y = 30 If x > y Then x = x - y Else y = y x If x < y Then x = x 20 Form1.Print x, y
- 在窗体中添加一个命令按钮Command1,编写如下代码: Private Sub Command1_Click() x = 6 If x > 6 Then If x = 6 Then Print "a" Else Print "b" End If Else If x < 8 Then Print "c" Else If x = 6 Then Print "d" End If End If End If End Sub 运行后,单击命令按钮,则在窗体上显示的是( )。
- 下列程序段运行后,窗体上显示的结果是( ) Dim x as integer If x then print 1 else print -1 A: A.1 B: B.-1 C: C.0 D: D. 出错信息