首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As Label) L.Caption="1234" End Sub Private Sub Form
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As Label) L.Caption="1234" End Sub Private Sub Form
admin
2015-08-28
32
问题
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:
Private Sub func(L As Label)
L.Caption="1234"
End Sub
Private Sub Form_Load()
Label1.Caption="ABCDE"
Label2.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Label2.Caption)
Call func(Label1)
Label2.Caption=a
End Sub
程序运行后,单击命令按钮,则在两个标签中显示的内容分别为( )。
选项
A、ABCD和10
B、1234和100
C、ABCD和100
D、1234和10
答案
D
解析
程序运行,窗体加载时设置Label1显示为ABCD,Label2显示为10。单击命令按钮,执行按钮的单击事件过程,过程中Val函数将Label2的标题字符串转换为数值赋给变量a,此时a的值为10,然后调用func过程传入Label1为参数,func过程中设置Label1的标题为"1234",回到按钮单击事件过程,设置Label2的标题为变量a的值,即10。因此两个标签中显示的内容分别为1234和10。
转载请注明原文地址:https://kaotiyun.com/show/qZQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
阅读程序:FunctionF(aAsInteger)b=0Staticcb=b+1c=c+1F=a+b+cEndFunctionPrivateSub
在窗体上画一个名称为Labell的标签,然后编写如下事件过程:OptionBase1PrivateSubFormClick()Dima(10)AsIntegerFork=1To10a(k)
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dimarr1(10)AsInteger,arr2(10)AsIntegern
CommonDialog控件可以显示______种对话框。
有如下程序,其运行结果为______。DimSumAsString*4ReadSum,X,Y%PrintSum,ZDate"X+Y:之和",300,200.613End
采用结构化程序设计方法能够使程序易读、易理解、【】和结构良好。
设有如下通用过程:PublicSubFun(a(),ByValxAsInteger)Fori=1To5x=x+a(i)NextEndSub在窗体上画一个名称为Text1的文
以下能够正确计算n!的程序是______。
随机试题
具有模板整体性好、抗震性强、无拼缝等优点的模板是()。
在盈亏平衡图中,变动费用线上的任何一点都表示对应于某一产量的()
大黄附子汤的服用须注意
手、足三阳经在头部的分布规律是()
肺动脉扩张引起瓣膜相对关闭不全所产生的杂音称为
甲施工企业授权某采购员到乙公司采购钢材,但该采购员用盖有甲施工企业公章的空白合同文本,与乙公司订立了购买水泥的合同,则该合同( )。
预制构件应按吊装次序和方向水平分层推放,堆放时层数,一般不宜超过()层。
甲公司是ABC会计师事务所的审计客户。A注册会计师负责审计甲公司2015年度财务报表,确定财务报表整体的重要性为160万元。资料一:A注册会计师在审计工作底稿中记录了所了解的甲公司情况及其环境,部分内容摘录如下:(1)2015年,甲公司主
APosterJustasthesunisstartingtoshineandthedaysaregettinglonger,theexaminationperiodbegins!I’dliketowi
A、Shewantstoleavethetheatrebeforethemovieisover.B、Shedoesn’tknowthewaytothetheatre.C、Shewantstogoearlyto
最新回复
(
0
)