首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Textl、Text2两个文本框及一个命令按钮Commandl,编写下列程序: DimYAs Integer Private Sub Command1_ Click() Dim xAs Integer x=2
窗体上有Textl、Text2两个文本框及一个命令按钮Commandl,编写下列程序: DimYAs Integer Private Sub Command1_ Click() Dim xAs Integer x=2
admin
2016-03-21
46
问题
窗体上有Textl、Text2两个文本框及一个命令按钮Commandl,编写下列程序:
DimYAs Integer
Private Sub Command1_ Click()
Dim xAs Integer
x=2
Text1.Text=p2(pl(x),y):Text2.Text=p1(x)
End Sub
Private Function pl(x As Integer)As Integer
x=x+y:y=x+y
p1=x+y
End Function
Private Function p2(x As Integer,y As IntegerlAs Integer
p2=2*x+y
End Function
程序运行后,第一次单击和第二次单击命令按钮后,文本框Text1和Text2内的值分别是( )。
选项
A、2 4
2 4
B、2 4
4 8
C、10 10
58 58
D、4 4
8 8
答案
C
解析
本题考查函数的调用以及变量的作用域。在命令按钮单击事件中调用p2函数,p2函数的参数为函数p1,因此首先计算p1调用以后产生的结果。第一次调用函数p1,变量y为窗体级变量,p1调用结束后y为2,p1为4;调用p2,得到p2值为10,x的值为2:继续调用p1(x),此时y值为2,调用结束以后p1为10。继续单击命令按钮,此时x值为2,而y的值为6,其余计算方法和第一次单击时相同。
转载请注明原文地址:https://kaotiyun.com/show/arLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
耦合和内聚是评价模块独立性的两个主要标准,其中______反映了模块内各成分之间的联系。
建立一个新的标准模块,应该选择()的“添加模块”命令。
为了在列表框中使用Ctrl和Shift键进行多个列表项的选择,应将列表框的MultiSelect属性设置为()。
用LineInput语句从顺序文件读出数据时,每次读出一行数据。所谓一行是指遇到______分隔符,即认为一行的结束。
软件工程研究的内容主要包括:【】技术和软件工程管理。
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项"大图标",则在该菜单项前添加一个"√"。以下正确的事件过程是
常见的软件开发方法有结构化方法和面向对象方法。对某应用系统经过需求分析建立数据流图(DFD),则应采用【3】方法。
逻辑常量值为True或______。
软件开发的结构化生命周期方法将软件生命周期划分成
随机试题
FIDIC向国际工程界提供的完整的标准合同体系,不包括()。
光缆单盘检验中,不需要使用OTDR进行测试的项目是()。
路基边桩放样的常用方法有()。
回国服务留学人员赵某于2015年2月10日用现汇购买了一辆个人自用国产小汽车。2017年3月,赵某将该车转让给宋某,转让价为138000元,并于3月10日办理了车辆过户手续。已知该小汽车初次办理纳税申报时确定的计税价格为180000元。宋某应纳车辆购置税
雀巢咖啡已是被大家所熟知的品牌,最新推出的“活出敢性之敢爱篇”广告引起了大家的共鸣。“为了爱情,常常伪装”,第一次去女友家的男生,心情非常忐忑,对女友父母说“我有车,有房”,这时,女友帮他倒了一杯咖啡,说“原味最好”,男生坦白“车是自行车,房是租的,但我很
新课程强调,教师是学生学习的()。
TheAmericandreamisthatanychildcanmakeitfromthebottomtothetop.Thatmaystillbetrueinpolitics;thesonofaKe
为了隐藏在文本框中输入的信息,用占位符代替显示用户输入的字符,需要设置的属性是(
Thetwoelementsofsuccessthatareintimatelyconnectedarecreativityandinnovation.
Whatwasthemantellinghisfriend?Hewastellinghisfriend______ofhiscontentedmarriage.Whatcanweinferfromthest
最新回复
(
0
)