窗体上有一个名称为Pieture1的图片框控件,一个名称为Lbel1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Lable1 Then x Caption="计算

admin2018-06-20  54

问题 窗体上有一个名称为Pieture1的图片框控件,一个名称为Lbel1的标签控件,如图所示。

现有如下程序:
Public Sub display(x As Control)
If TypeOf x Is Lable1 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是一个控件变量。当单击Picture1控件或Label1控件时,都会调用display过程,而传入的参数分别是这两个参数的控件名,在display过程中程序判断参数传入控件的类型,如果是标签控件,就在它的标题上显示“计算机等级考试”,否则就认为是图片控件,就在图片框中加载一个图片显示出来。程序运行正常,因此A选项错。
转载请注明原文地址:https://jikaoti.com/ti/ipy0FFFM
0

最新回复(0)