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

admin2019-08-21  33

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

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

答案A

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

最新回复(0)