首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画两个标签和一个命令按钮,其名称分别为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
2020-06-30
35
问题
在窗体上画两个标签和一个命令按钮,其名称分别为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/OnHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
鼠标拖放控件要触发两个事件,这两个事件是( )。
设有窗体的Form_MouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) If(Button
以下打开VisualBasic菜单编辑器的操作中,错误的是( )。
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
下列程序执行后,变量a的值为()。Dima,b,c,dAsSinglea=10:b=20:c=40Ifb>aThend=a:a=b:b=dEndIfIfc>aThend=a:a=c:c=dEndIfIfc>bThe
下列程序段的输出结果是x=5Printx+1;x+1
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
随机试题
在PowerPoint中的________视图模式下,用户可以看到演示文稿的最终效果,如图形、计时、音频、视频以及各种动画等。
已列入国家药品标准的药品名称,或已成为药品通用名称,不能作为
(2002年考试真题)法人和其他单位在票据和结算凭证上的签章,为该法人或单位的公章或财务专用章,加上其法定代表人或者其授权的代理人的签名或盖章。()
如图4所示,虚线a、b、c、d表示匀强电场中的4个等势面,两个带电粒子M、N(重力忽略不计)以平行于等势面的初速度射入电场,运动轨迹分别如图中MPN和NQM所示。已知M是带正电的带电粒子,则()。
景色:旅游:欣赏
马克思主义政治经济学的理论基础是()。
美国联邦所得税的征收实行累进税制,即收入越高,纳税率越高。美国有的州还在自己管辖的范围内,在绝大部分出售商品的价格上附加7%左右的销售税。如果销售税也被视为所得税的一种形式的话,那么,这种税收是违背累进制原则的:收入越低,纳税率越高。以下哪项如果为真,最能
Students(andothers)often,asIsaidearlier,talkabout"using"thisorthatapproach—"IthinkI’lluseDurkheim"—asthoughthe
已知α1,α2,α3,α4是3维非零向量,则下列命题中错误的是()
SendingE-mailstoProfessorsOnestudentskippedclassandthensenttheprofessorane-mail(51)forcopiesofherteaching
最新回复
(
0
)