首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Label Then x C
窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Label Then x C
admin
2015-08-13
58
问题
窗体上有一个名称为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
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时,要求文件列表框中显示当前选中的文件夹中的内容,则在Dir1_Change事件过程中应使用的语句是______。
下列程序段的执行结果为______。Dimm(3,3)AsIntegerDimiAsIntegerDimjAsIntegerDimKAsIntegerFori=1To3m
执行以下语句后显示结果为______。DimXAsIntegerIfxThenPrintXElsePrintx-1
要把一个命令按钮设置成无效,应设置属性______的值为False。
有如下事件过程:PrivateSubFormActive()DimScore(1to3)AsIntegerDimiAsIntegerDimtAsVariant
下面程序的功能是统计字符串中“i”的个数,请填空。SubCOU()DimnAsIntegera$="BeijingUniversityofTechnology"n
以下能够触发文本框Change事件的操作是______。
设有如下变量声明:DimTestDateAsDate为变量TestDate正确赋值的表达方式是______。
下列四个关于DoEvents语句的叙述中,正确的是______。
随机试题
抹灰工程应对水泥的()进行复验。
美的,东山再起1995—1997年,曾经创造了辉煌业绩的中国家电业巨子美的集团,由于许多具有传奇色彩的创业故事构筑的光环终于暗淡下来。面临空调市场的严峻考验,关的退出了市场的中心。美的最初是由23个伙伴,5000元资本,从一个乡土味
甲状舌管瘘的内口位于
A.伤寒B.中毒型菌痢C.流行性出血热D.流行性乙型脑炎E.急性病毒性肝炎血白细胞增多,异型淋巴细胞比例常高于10%,多见于
指示提单()。
Ifyouhaveanyinformationregardingtheidentityoftheman______lefthiscarparkedinthelotovernight,pleasecontactthe
资本主义工资的本质是()。
日本三个月亡华计划破产的标志是()。
Theyoungmanwenttoatown______.Whydidtheyoungmanstopplayingjokesontheservant?Because______.
Affirmativeactionmaynotbethemostdivisiveissueontheballot,butitremainsanunendingsourceofconflictanddebatea
最新回复
(
0
)