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