首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画两个标签和一个命令按钮,其名称分别为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
45
问题
在窗体上画两个标签和一个命令按钮,其名称分别为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全国计算机二级
相关试题推荐
为计算an的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLong DimsAsLong p=a Fork=1Ton p=p*a Next
有下面程序代码:PrivateSubCommand1_Click()DimxAsInteger,sAsIntegerx=1Fork=1To3x=x+1
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Text1.Text=p2(p1(
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
下列程序段的输出结果是x=5Printx+1;x+1
设有如下程序代码:PrivateSubCommandl_Click()DimSnameAsString,SNoAsString,ScoreAsSingleOpen”D:\Score.txt"_______As
窗体上有2个名称分别为Text1和Text2的文本框,1个名称为Command1的命令按钮。单击Command1时,Text1中选中的文本将显示在Text2中。下列能实现上述操作的事件过程是
随机试题
高压燃气必须通过调压站才能给城市分配管网中的()供气。
血管神经性水肿一般不发生在
易引起免疫耐受性的抗原注射途径为
下列关于化学反应速率常数k的说法正确的是()。
刑事诉讼中,依法不能引起审判监督程序的是()。
企业的最佳资本结构是指()。
由实际工作者和专业研究人员共同参与,以解决教学实际问题和提高教学行动的自觉认识为目的的研究方法是()。
尽管通过一种新的计算机辅助设计过程生产出来的定制的修复用的骨替代物的价格是普通替代物的两倍多,但定制的替代物仍然是节约成本的。定制的替代物不仅可以减少手术和术后恢复的时间,而且它更耐用,因而可以减少再次住院的需要。以下哪项能评价以上提出的论述?
Sample是一个类,执行下列语句后,调用Sample类的构造函数的次数是Samplea[2],*P=FlewSample;
______findoutthathiscomputerwasstolen.
最新回复
(
0
)