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

admin2016-08-24  30

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

  现有如下程序:
  Public Sub display(x As Control)
    If TypeOf x is Label Then
    x Caption="计算机等级考试"
    Else
    xPieture=LoadPicture("pic.jPg")
    End If
  End Sub
  PIivate Sub Label1_Click()
    Call display(Label1)
  End Sub
  Private Sub Picturel_Click()
    Call display(Pieturel)  
    End Sub
    对以上程序,下列叙述中错误的是(    )。

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

答案A

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

最新回复(0)