首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码: Private X As Integer Private Sub Command1_Click( )
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码: Private X As Integer Private Sub Command1_Click( )
admin
2020-08-10
40
问题
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:
Private X As Integer
Private Sub Command1_Click( )
X=5;Y=3
Call proc(X,Y)
Label1.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://www.kaotiyun.com/show/NlHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对手某些控件,只要将其Style属性设置为1,则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是
在软件设计中,不属于过程设计工具的是
如果把命令按钮的Cancel属性设置为True,则程序运行后
下面关于VB数据文件的叙述中错误的是
在程序中要使用Array函数给数组arr赋初值,则以下数组变量定义语句中错误的是()。
要使标签中的文本靠右显示,应将其Aligment属性设置为
下列表达式中不能判断x的是否为偶数的是
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
把数学表达式表示为正确的VB表达似乎应该是
随机试题
Excuseme,butitistimetohaveyourtemperature______.
对乙型肝炎病毒感染有保护预防作用表示乙肝有急性活动
滑胎之血瘀证,治疗宜选
某房地产开发公司在销售中被查出大量欺诈消费者的事实。下列哪些情形中,买受人可以请求该公司返还已付购房款及利息、赔偿损失,并可以请求该公司承担不超过已付购房款一倍的赔偿责任?(2009—卷三—58,多)
承包人在索赔报告中提出设备费的索赔包括( )。
甲公司于2003年10月25日接到银行通知;向该银行的借款已逾期,银行已向法院起诉,要求归还本息250、万元,另支付逾期罚息20万元。至2003年12月31日法院尚未作出判决。对于此诉讼,甲公司预计除需偿还全部本息外,有70%的可能性还需支付罚息10万-1
华天公司2×16年、2×17年分别以450万元和110万元的价格从股票市场购入A、B两支以交易为目的的股票,两只股票市价一直高于购入成本。公司采用成本与市价孰低法对购入股票进行计量。公司从2×18年起对其以交易为目的购入的股票由成本与市价孰低计量改为公允价
UrbanizationUntilrelativelyrecently,thevastmajorityofhumanbeingslivedanddiedwithouteverseeingacity.Thefir
Thatexperiencesinfluencesubsequentbehaviourisevidenceofanobviousbutneverthelessremarkableactivitycalledrememberin
TakingEarlyRetirementMayRetireMemory,TooThetwoeconomistscalltheirpaper"MentalRetirement",andtheirargumenth
最新回复
(
0
)