If Not x>0 Then x=y-3 Else y=x+3 Print x-y; y-x
31.以下程序段运行时从键盘上输入字符\，则输出结果为 ( -2 ) op$=InputBox(\ If op$=\ If op$=\ Print a
32.在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字符，则把命令按钮的标题设置为\计算机等级考试\。以下能实现上述操作的事件过程是： Private Sub Text1_Change()
Command1.Caption=\计算机等级考试\ End Sub
33.在窗体(Name属性为Form1)上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name 属性为Command1），然后编写如下两个事件过程： Private Sub Command1_Click() a=Text1.Text+Text2.Text Print a End Sub
Private Sub Formm_Load() Text1.Text=\ Text2.Text=\ End sub
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为 123321
34.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=InputBox(\ Select Case x Case 1,3 Print \分支 1\ Case Is >4 Print \分支 2\ Case Else Print \分支 \
End Select End Sub
程序运行后，如果在输入对话框中输入2，则窗体上显示的是Else分支
35.在窗体上画一个命令按钮和一个文本框名称分别为Command1和Text1然后编写如下程序: Private Sub Command1_Click() a = InputBox(\请输入日期(1~31)\
t = \旅游景点:\长城\ & IIf(a > 10 And a <= 20 ,\故宫\ & IIf(a > 20 And a <= 30, \颐和园\ Text1.Text = t End Sub
程序运行后如果从键盘输入16则在文本框中显示的内容是: 旅游景点：故宫
36.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2, 4, 6 x = 20 Case Is < 10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub
程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是 10
37.在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是 Timer1.Interval=500 38.表达式 5 Mod 3+3\\5*2的值是 2
39.设a=\执行语句x=IIf((ad),\后，x的值为\
40.在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False,程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序： Private Sub Command1_Click() Timer1._________ End Sub
Private Sub Timer1_Timer() Text1.Text = Time End Sub
在______处应填入的内容是 Enabled=True
41.如果X的值小于或等于Y的平方，则打印“OK”，表示这个条件的单行格式If语句是__If x<=y^2 Then Print \_。
42.表达式Y+1>=X是一个___关系表达式 __。
43.有一个分段函数，当X<0时，Y=-1；当X=0时，Y=0；当X>0时，Y=1。该分段函数在程序段中可表达为： If X<0 Then Y=-1
ElseIf X=0 Then . Y=0 Else Y=1
44.以下Case语句中错误的是
A.Case 0 To 10 B. Case Is>10 C. Case Is>10 And Is< 50 D . Case 3,5,Is>10
45. 关于语句 If x=1 Then y=1,下列说法正确的是__x=1为关系式表达式，y=1为赋值语句 __。 46.窗体上有命令按钮（COMMAND1)和文本输入框TEXT1,命令按钮click中代码如下： Private Sub Command1_Click() A = 75
If A > 60 Then I = 1 If A > 70 Then I = 2 If A > 80 Then I = 3 If A > 90 Then I = 4 Text1.Text = I End Sub
运行后，单击命令按钮，text1中显示__2__。 47.设有如下程序:
Private Sub Command1_Click() Dim c As Integer, d As Integer c = 4
d = InputBox(\请输入一个整数\ Do While d > 0 If d > c Then c = c + 1 End If
d = InputBox(\请输入一个整数\ Loop Print c + d End Sub
程序运行后,单击命令按钮如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0,则输出结果是: 9