首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画两个标签和一个命令按钮,其名称分别为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
2018-05-08
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/a0Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下函数过程:FunctionFun(ByValxAsIngeger,ByValyAsInteger)AsIntegerDoWhile…y<>0reminder=xMody
阅读程序:SubsubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubCommand1_Cli
下列程序段的执行结果为______。Forx=5To1Step-1ForY=1To6-xPrintTab(Y+5);"*";NextYPrintNextx
如果一个变量未经定义就直接使用,则该变量的类型为
图像框的()属性,可以自动调整图形的大小以适应图像的尺寸。
下列叙述中正确的是
下列可以激活属性窗口的操作是()。
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,iAsIntegerR
在数据库系统中,用于对客观世界中复杂事物的结构及它们之间的联系进行描述的是
设有三张表,客户(客户号,姓名,地址),产品(产品号,产品名,规格,进价),购买(客户号,产品号,价格),其中表客户和表产品的关键字(键或码)分别为客户号和产品号,则表购买的关键字为
随机试题
以下不是国家宏观调控手段的选项是()。
延长停留时间可以使原料的转化率增加,选择性下降。 ()
影响伤口愈合最常见的局部因素是
建筑总平面图上的室外地坪标高通常采用()。
施工现场的消防通道应满足消防车通行和灭火作业需要的基本要求,保证()。
下列关于学前儿童科学活动重要性的论述中,正确的是()
一个民族的文化与精神的健康发展,最重要的标志就是敢于并善于__________所有优秀的文化,如我们常常讲,大唐时代长安流行胡乐,并没有使我们的文化出现__________。依次填入画横线部分最恰当的一项是()。
(2012年)设区域D由曲线y=sin,x=,y=1围成,则(xy5-1)dxdy=
关于下面的程序段,说法正确的是()。importjava.awt.*;importjava.applet.*;publicclassTestextendsApplet{CanvasMyCanvas
It’sdifficulttoimaginetheseaeverrunningoutoffish.It’ssovast,sodeep,so【B1】______.Unfortunately,it’snot【B2】____
最新回复
(
0
)