单项选择题

标准模块中有如下程序代码：
Public x As Integer, y As Integer
Sub var_pub()
x=10 : y=20
End Sub
Private Sub Command1_Click()
Dim x As Integer
Call vat_pub
x = x + 100
y = y + 100
Print x ; y
End Sub
运行程序后单击命令按钮，窗体上显示的是( )。

A) 100 100
B) 100 120
C) 110 100 D) 110 120
<上一题 目录 下一题>
热门 试题

单项选择题
窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下： Private Sub Timer1_Timer() Static flag As Integer If flag = 0 Then flag = 1 flag = -flag If flag = 1 Then Text1. ForeColor = &HFF& ’&HFF& 为红色 Else Text1. ForeColor = &HC000& ’&HC000& 为绿色 End If End Sub 以下叙述中正确的是( )。
A) 每次执行此事件过程时，flag的初始值均为0
B) flag的值只可能取0或1
C) 程序执行后，文本框中的文字每5秒改变一次颜色
D) 程序有逻辑错误，Else分支总也不能被执行
单项选择题
计算下面分段函数的正确语句是( )。
A) y=IIf(x＞0, x+1, IIf(x＜0, x-1, 0))
B) y=IIf(x=0, 0, IIf(x＞0, x-1, x+1))
C) y=IIf(x＞0, x+1, IIf(x＜0, 0, x-1))
D) y=IIf(x=0, 0, x-1, x+1)
相关试题