问题
单项选择题
设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下:
Private Sub Command1_Click()
Dim a As Integer
a=10
Call g(Form2,a)
End Sub
Private Sub g(f As Form, X As Integer)
y=IIf(x>,10,000, -100)
f. Show
f. Caption=y
End Sub
运行以上程序,正确的结果是( )。
A.Forml的Caption属性值为100
B.Form2的Caption属性值为-100
C.Form1的Caption属性值为-100
D.Form2的Caption属性值为100
答案
参考答案:B
解析: 本题主要考查IIf语句以及自定义函数的使用。
IIf是If…Then…Else语句的紧凑表达。语法如下:
IIf(expression,if_true,if_false),如果expression成立,执行if_true,如果不成立,执行if_false。
本题定义了一个函数g,用来给Form2设置标题。在Command1的单击事件中,将Form2和a传给函数g。执行结果为选项B。