首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Label Then x Capti
窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件,如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Label Then x Capti
admin
2019-03-14
19
问题
窗体上有一个名称为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(Picture1)
End Sub
对以上程序,下列叙述中错误的是( )。
选项
A、程序运行时会出错
B、单击图片框,在图片框中显示一幅图片
C、过程中的x是控件变量
D、单击标签,在标签中显示一串文字
答案
A
解析
程序中定义了一个过程display(x as Control),它的参数x是一个控件变量。当单击Picture1控件或Label1控件时,都会调用display过程,而传入的参数分别是这两个参数的控件名,在display过程中程序判断参数传入控件的类型,如果是标签控件,就在它的标题上显示"计算机等级考试",否则就认为是图片控件,就在图片框中加载一个图片显示出来。程序运行正常,因此A选项错。
转载请注明原文地址:https://kaotiyun.com/show/mIUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:PrivateSubCommandl—Click()DimxAsInteger,sAsIntegerx=1Fork=1To3x=x+1:proex:s=s+xNextkPrintsEndSubP
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的函数过程如下:PrivateSubCommandl—Click()DimiAsIntegerFori=1To500Ifp(i)Thens=s+1NextPrin
编写如下程序:PrivateSubCommand1Click()DimxAsInteger,yAsIntegerx=InputBox(“输入第一个数”):y=InputBox(“输入第二个数”)Callf(x,y)Print
将数据项“Student”添加到名称为Listl的列表框中,并使其成为列表框第一项的语句为
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是
执行下列语句strlnput=InputBox(“请输入字符串”,“字符串对话框”,“字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strlnput的内容是
如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是
下列关于通用对话框CDl的叙述中,错误的是()。
下列说法中,错误的是
以下说法中正确的是()。
随机试题
我国膳食结构以植物性食物为主,由于植物性食物中草酸和植酸含量高,可促进钙的吸收。()
男性,23岁。5天前受凉后出现咳嗽、低热及右胸刺痛,后感活动后气促。查体:右下肺语颤减弱,叩诊呈浊音,浊音上方可及支气管呼吸音,其下方呼吸音减弱以至消失,以下最可能的诊断是
原核生物翻译过程中,促进核蛋白体大、小亚基分离的物质是
中国证监会于2013年3月1日接到多家上市公司申请发行新股的报告,下列哪家公司的申请依法不应被批准?()
价值工程中的必要功能和不必要功能是按()分类的。
交易双方约定在未来某一时期相互交换某种合约标的资产的合约是()。
证券公司净资本或其他风险控制指标不符合规定标准的,派出机构应当责令公司限期改正,在5个工作日内制订并报送整改计划,整改期限最长不超过()个工作日。
下列情形中,人民警察不得使用武器的有()。
五个一位正整数之和为30,其中两个数为1和8,而这五个数的乘积为2520,则其余三个数为()
—Readthearticlebelowaboutpublicimage.—Choosethebestwordtofilleachgap,fromA,B,CorD.—Foreachquestion19—33,
最新回复
(
0
)