首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码: Private X As Integer Private Sub Command1_Click() X=5:
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码: Private X As Integer Private Sub Command1_Click() X=5:
admin
2018-07-11
24
问题
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:
Private X As Integer
Private Sub Command1_Click()
X=5:Y=3
Call proc(X,Y)
Labell.Caption=X
Label2.Caption=Y
End Sub
Private Sub proc(a As Integer,ByVal b As Integer)
X=a*a
Y=b+b
End Sub
程序运行后,单击命令按钮,则两个标签中显示的内容分别是( )。
选项
A、25和3
B、5和3
C、25和6
D、5和6
答案
A
解析
虽然在过程proc中参数a默认为按地址传递,参数b指定了ByVal(按值)方式传递,但过程中并没有对a,b的值改变,只对变量X和Y进行了赋值,而X是在窗体模块中起作用的模块变量,而变量Y在proc过程中没有声明,要整个模块中也没有声明,说明它是一个局部变量,只在本过程中起作用。因此,在proc过程中X=a*a=5*5=25,会使按钮单击事件中的变量X值变为25,而按钮单击事件过程中的变量Y不受影响,仍是原来的值3。因此两个标签上会分别显示25和3。
转载请注明原文地址:https://jikaoti.com/ti/Rem0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60Thenr=2Else
已知列表框控件List1中已放入若干表项,下列关于List1的叙述中错误的是
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()Text1.Text:"":Text2.Text="":Text1.SetFocusEndSubPrivateSu
设窗体上有2个文本框Text1和Text2,并有下面的事件过程:DimnPrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"
以下关于VB的叙述中,错误的是
以下关于VB特点的叙述中,错误的是
假定有以下程序段Fori=lTo3Fori=5To1Step-1Printi*jNextjNexti则语句Printi*j的执行次数是
表达式12/2\4的值是( )。
下面不属于软件测试实施步骤的是
下面不能作为结构化方法软件需求分析工具的是
随机试题
消防控制室图形显示装置由硬件和软件两部分组成。()
患者,女性,21岁,不规则关节痛1年余,近2个月来两面颊部出现对称性水肿性红斑,日照后明显,伴张口困难及吞咽困难,遇冷手指苍白疼痛。实验室检查:ESR150mm/h,ANA(+),抗ds—DNA(+),抗Scl-70(+),食管吞钡查食管蠕动差。最可能的诊
A、利奈唑胺B、头孢曲松C、头孢他啶D、头孢噻肟E、红霉素铜绿假单胞菌感染宜选用的抗菌药物是
A、 B、 C、 D、 C
有关招标代理机构的说法错误的是()。
征用耕地的土地补偿费为该耕地被征用前三年平均年产值的()倍。
某企业生产甲产品,实际产量为9600件,实际工时为17280小时,实际变动制造费用与固定制造费用分别为88128元和200000元。本月预算产量为8000件,单位工时标准为1.6小时/件,标准变动制造费用分配率为4元/小时,标准固定制造费用分配率为6.4元
李亮参加了某竞赛班的面试,很快他得到消息:①他和黄山至少录取一人;②可能不录取他;③一定录取他;④黄山已被录取。已知:其中两条是真的,两条是假的。那么,据此可知,以下()为真。
心理咨询师给临床资料赋予意义的方法包括()
TheriseandfallofvacationsTheriseTopvacationtime:AugustPaidvacationisa【D1】______.Theappearanceoftheword"vaca
最新回复
(
0
)