首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim X As Integer x=2
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim X As Integer x=2
admin
2017-11-27
32
问题
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:
Dim y As Integer
Private Sub Command1_Click()
Dim X As Integer
x=2
Text1.Text=p2(p1(x),y):Text2.Text=p1(x)
End Sub
Private Function p1(x As Integer)As Integer
x=x+y=x+y
p1=x+y
End Function
Private Function p2(x As Integer,y As Integer)
As 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://jikaoti.com/ti/DPy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为______。I=0ForG=10To19Step3I=I+1NextGPrintI
有如下程序。PrivateSubCommand1_Click()DimkAsInteger,mAsIntegerDimopAsIntegerk=4:m=1op=PPC(k,m):Printop;op=P
运行以下程序,输出结果是()。ForI=1To3clsPrint"I=",I;Next
为了把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为______。
VisualBasic一共有设计、运行和中断三种模式,要使用调试工具应该______。
下列叙述中正确的是______。
以下叙述中错误的是______。
将E-R图转换到关系模式时,实体与实体间的联系可以表示成()。
表达式Sgn(0.25)的值是
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load0Shapel.Top=0:Timer1.Interval=100
随机试题
根据以下资料,回答以下问题。截至2014年12月底,全国实有各类市场主体6932.22万户,比上年末增长14.35%,增速较上年同期增加4.02个百分点;注册资本(金)129.23万亿元,比上年末增长27.70%。其中,企业1819.28万户,个
孕32周早产儿,有窒息史,生后第2天嗜睡,面色微绀,呼吸32次/分且不规则,心率95次/分,四肢肌张力差,前囟平,其诊断考虑为
口腔健康教育和口腔健康促进结合起来可以
患儿3岁,急性肾炎11天,刻下症见全身浮肿,尿闭,头晕头痛,恶心呕吐,舌苔腻,脉弦。实验室检查示BUN明显增高。应首先考虑的是
规则框架外的影响因素主要包括()。
工程咨询单位受客户委托编制工程招标文件的工作,一般是在工程项目()阶段进行。
金融业是一个高风险行业,其风险性首先在于()。
全国风景名胜区由()负责监督管理工作,国务院其他有关部门按照国务院规定的职责分工。
S市环保监测中心的统计分析表明,2009年空气质量为优的天数为150天,比2008年多出22天;二氧化硫、一氧化碳、二氧化氮、可吸入颗粒物四项污染物浓度平均值,与2008年相比分别下降了约21.3%、25.6%、26.2%、15.4%。上午市环保负责人指出
下列各项中,有权制定税收规章的税务主管机关有()。
最新回复
(
0
)