窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Label Then x C

admin2015-08-13  30

问题 窗体上有一个名称为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(Pieture1)
End Sub
对以上程序,下列叙述中错误的是(    )。

选项 A、程序运行时会出错
B、单击图片框,在图片框中显示一幅图片
C、过程中的x是控件变量
D、单击标签,在标签中显示一串文字

答案A

解析 程序中定义了一个过程display(x as Control),它的参数x是一个控件量。当单击Picture1控件或Label1控件时,都会调用display过程,而传入的参数分别是两个参数的控件名,在display过程中程序判断参数传入控件的类型,如果是标签控件,就在它的标题上显示“计算机等级考试”,否则就认为是图片控件,就在图片框中加载一个图片显示出来。程序运行正常,因此A选项错。
转载请注明原文地址:https://kaotiyun.com/show/1lQp777K
0

最新回复(0)