首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画两个标签和一个命令按钮,其名称分别为Labdl1、Label2.和Command1,然后编写如下程序: Private Sub func(L As Label) L.Caption="1234" End Sub
在窗体上画两个标签和一个命令按钮,其名称分别为Labdl1、Label2.和Command1,然后编写如下程序: Private Sub func(L As Label) L.Caption="1234" End Sub
admin
2020-01-02
40
问题
在窗体上画两个标签和一个命令按钮,其名称分别为Labdl1、Label2.和Command1,然后编写如下程序:
Private Sub func(L As Label)
L.Caption="1234"
End Sub
Private Sub Form_Load()
Label1.Caption="ABCDE"
Lbel2.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Label2.Caption)
Call func(Label1)
LabeLl.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,然后调用fune过程,传入Label1为参数,func过程中设置Label1的标题为“1234”,回到按钮单击事件过程,设置Label2的标题为变量a的值,即10。因此两个标签中显示的内容分别为1234和10。
转载请注明原文地址:https://kaotiyun.com/show/LBTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Tex
(1)在名称为Form1,标题为“框架”的窗体上添加一个名称为Frame1,且标题为空的框架。框架内含有两个单选按钮,名称分别为Opt1和Opt2,其标题分别为“字体”、“大小”。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vb
(1)在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Cl
(1)在名称为Form1的窗体上添加一个计时器控件,名称为Timerl。请利用属性窗口设置适当属性,使得在运行时可以每隔1秒,调用计时器的Timer事件过程一次。另外,请把窗体的标题设置为“题目2”。设计阶段的窗体如图3.73所示。(2)在名称为
以下合法的VB变量名是
VB中,若没有显式声明变量的数据类型,则默认的类型是
以下关于多重窗体程序的叙述中,错误的是
关于水平滚动条,如下叙述中错误的是
有三个关系R,S和T如下图所示:则由关系R和S得到关系T的运算是()。
每所学校都有一名校长,而每个校长只在一所学校任职,则实体学校和实体校长之间的联系是()。
随机试题
看焊接机械零件图有什么要求?按剖切范围的大小,剖视图分为哪几种?
鞭毛的主要作用是
某股份有限公司因进行技术改造需要一笔资金,就以其享有的一项实用新型专利权作为质押,向银行申请了500万元人民币的贷款,在签订了贷款合同和质押合同后,双方即向有关部门办理了出质登记手续。则以下说法正确的是:()
错账更正的方法主要有()。
Donovan公司最近宣告并发放了50%的股票股息。该项交易会降低公司的
(2012年)2009年3月1日,甲房地产公司(简称甲公司)与乙建筑公司(简称乙公司)签订一份建筑工程承包合同,约定由乙公司承建甲公司开发的景明写字楼项目,工程价款5000万元,工期14个月。工程将要竣工时,甲公司因资金短缺,无力继续提供约定由其提供的部分
下列属于社区矫正对象的是()
“心不在焉,则黑白在前而不见,擂鼓在侧而不闻”,说明人的心理活动过程离不开()。
数据的独立性是指(28)是相互独立的;它又可分为(29)。
WhatistheView-R?
最新回复
(
0
)