问题
单项选择题
窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。
现有如下程序：
Public Sub display(x As Contr01)
If TypeOf x Is Label Then
x.Caption="计算机等级考试"
Else
x.Picture=LoadPicture("pic.jPg")
End If
End Sub
Private Sub Label1_Click()
Cali display(Label1)
End Sub
Private Sub Picture1_Click()
Call display(Picture1)
End Sub
对以上程序，下列叙述中错误的是（）。
A．程序运行时会出错
B．单击图片框，在图片框中显示一幅图片
C．过程中的x是控件变量
D．单击标签，在标签中显示一串文字
答案
参考答案：A
解析：
程序中定义了一个过程display(x as Control)，它的参数x是一个控件变量。当单击Picture1控件或Label1控件时，都会调用display过程，而传入的参数分别是这两个参数的控件名。在display过程中程序判断参数传入控件的类型，如果是标签控件，就在它的标题上显示“计算机等级考试”，否则就认为是图片控件，就在图片框中加载一个图片显示出来。程序运行正常，因此A选项错误。