首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Pieture1的图片框控件,一个名称为Lbel1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Lable1 Then x Caption="计算
窗体上有一个名称为Pieture1的图片框控件,一个名称为Lbel1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Lable1 Then x Caption="计算
admin
2018-06-20
61
问题
窗体上有一个名称为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://kaotiyun.com/show/DYGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是
以下关于过程及过程参数的描述中,错误的是
若要把窗体上命令按钮Commandl的状态设置为不可用,应该执行的命令是
如果改变驱动器列表框的Drive属性,则将触发的事件是
在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为Fl和F2,标题分别为”交通工具”和”到达目标”。在Fl中画两个单选按钮,名称分别为Opl和Op2,标题分别为”飞机”和”火车”。在F2中画两个单选按钮,名称分别为Op3和Op
在长度为n的有序线性表中进行二分查找,最坏情况下需要比较的次数是()。
对于长度为n的线性表,在最坏情况下,下列各排序法所对应的比较次数中止确的是()。
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
随机试题
20世纪60年代以来,许多国家推行“教育先行”的改革,以促进国民经济快速发展。这种政策的理论基础是()
试述社会主义市场经济体制的主要任务。
EventhoughheknewthatIshouldstudy,hestill___________metogotoseethemovie.
完全随机设计的方差分析中的组间均方是
企业在使用注册商标时的主要义务是()。
付款人承兑时在汇票上记载“收款人交货并验收合格后付款”。依我国《票据法》,此记载的后果是()。
人民法院在适用简易程序审理刑事公诉案件时,下列哪些选项是人民检察院应当要求人民法院将简易程序转为普通第一审程序审理案件的情形?
(一)资料丙汽车制造股份有限公司(以下简称丙公司)成立于2000年,主要生产小汽车,是增值税一般纳税人。2012年4月,丙公司向丁公司销售了一批小汽车,双方签订了书面买卖合同;为支付货款,丁公司向丙公司签发了一张银行承兑汇票。2013年4月,丙公司在
封闭式基金合同生效的条件之一是,基金份额持有人人数达到()人以上。
Lunarsight-seeingtripsandorbitingspacehotelsamwithinroach,moonwalkingastronautEdwin"Buzz"Aldrinsaidlastweek,b
最新回复
(
0
)