首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl,编写下列程序: DimY As Integer Private Sub Commandl Click() Dim X As Integer x=2 Text1.Tex
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl,编写下列程序: DimY As Integer Private Sub Commandl Click() Dim X As Integer x=2 Text1.Tex
admin
2012-12-08
64
问题
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl,编写下列程序:
DimY As Integer
Private Sub Commandl Click()
Dim X As Integer
x=2
Text1.Text=p2(pl(X),Y)
Text2.Text=pl(x)
End Sub
Private Function pl(X As Integer)As Integer
x+X+Y:y=x+Y
pl=x+Y
End Function
Private Function p2(X As Integer,Y As Integer)As Integer
p2=2*X+Y
End Function
当单击1次和单击2次命令按钮后,文本框Textl和Text2内的值分别为( )。
选项
A、2 4
2 4
B、2 4
4 8
C、4 4
8 8
D、10 10
58 58
答案
D
解析
程序中y为窗体变量,其作用范围为整个窗体中的所有子过程,要注意区分作为p1、p2形式参数的y变量。
窗体变量y能够记录程序运行中对其的改变,第1次调用pl,y值为2;第2次调用p1,y值为6;第3次调用pl,y值为11;第4次调用p1,y值为36;所以计算出的函数pl、p2的返回直也会不同。
转载请注明原文地址:https://kaotiyun.com/show/Djhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序代码的运行结果为 PrivateSubCommand1_Click() printMyFunc(20,18) EndSub PublicFunctionMyFunc(mAsInteger,nAsIn
下列说法错误的是
为了暂时关闭计时器,应把计时器的某个属性设置为False,这个属性是______。
阅读程序:FunctionF(aAsInteger)b=0Staticcb=b+1c=c+1F=a+b+cEndFunctionPrivateSub
下列描述中正确的是______。
下列关于栈的描述中错误的是______。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1中画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将程序补充完整。
假定有一菜单项,名为MenuItem,为了运行时使该菜单项失效(变灰),应使用的语句为
在设计阶段,当双击窗体上的某一个文本框控件时,系统将在代码窗口中显示该文本框控件的事件过程模板是
关于语句“Open“a1.txt”ForAppendas#10”的说法正确的是()。
随机试题
唐代的边疆民族政策带来的历史结果是
对结核菌素试验阳性者,如何辨别其为卡介苗接种效应抑或结核自然感染?
A.支气管哮喘发作时,极度呼吸困难B.甲状腺功能亢进手术治疗后C.行颅骨牵引时D.会阴部检查时E.产妇胎膜早破时半坐卧位常用于
患儿,男,3岁,哭闹时出现口唇发绀,听诊闻及胸骨左缘收缩期杂音,考虑为先天性心脏病。最具有诊断价值的检查是
在房地产经纪人执业资格注册有效期内,房地产经纪人若想调到另一家经纪机构执业,除与原机构解除聘用关系外,还应当及时办理注册()手续。
建设以“该高则高,能低则低,(),区别对待”为原则。
风险监控的主要内容是()。
高校教师岗位设置应遵循的原则有()。
人们经常使用微波炉给食品加热。有人认为,微波炉加热使食物的分子结构发生了改变,产生了人体不能识别的分子。这些奇怪的新分子是人体不能接受的,有些还具有毒性,甚至可能致癌。因此,经常吃微波食品的人或动物,体内会发生严重的生理变化,从而造成严重的健康问题。
Whatdomostofnsdotothepreparationforourtaskssincetheyseemacertainperiodoff?WhatwillprobablyNOThappenifw
最新回复
(
0
)