首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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
2019-03-14
58
问题
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:
Dim y As Integer
Private Sub Command1_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 hteger)
AsInteger
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;继续调用pl(x),此时y值为2,调用结束以后p1为10。继续单击命令按钮,此时x值为2,而y的值为6,其余计算方法和第一次单击时相同。
转载请注明原文地址:https://kaotiyun.com/show/XpFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:PrivateSubForm_Click()DimAAsInteger,BAsIntegerA=0Fori=1To5A=A+1B=0
在Open语句中可以用Output和Append两种方式打开顺序文件,其主要区别是
编写如下程序:DimxAsInteger,yAsInteger,zAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=1:y=2:z=3
在数据库设计中,将E-R图转换成关系数据模型的过程属于
假定有以下函数过程:FunctionFun(SAsString)AsString Dims1AsString Fori=1ToLen(S) s1=LCase(Mid(S,i,1))+s1 Nexti
下列关于通用对话框CommonDialog1的叙述中,错误的是( )。
能够用于标识对象名称的属性是( )。
(1)在名称为Form1的窗体上添加一个名称为Picture1的图片框(PictureBox),高、宽均为1000。在图片框内再添加一个有边框的名称为Imagel的图像框(Image)。并通过属性窗几把考生文什火下的图标文件Pointl1(香蕉图标)装入图
(1)在名称为Form1的窗体上添加两个名称分别为Frame1、Ftame2的框架,标题分别为“字号”、“修饰”;在Frame1中添加两个单选按钮,名称分别为Option1、Option2,标题分别为“10号字”、“20号字”,且标题显示在单选按钮的左边
将E-R图转换为关系模式时,实体和联系都可以表示为
随机试题
瑞典社会保障制度的模式是()
依照我国《婚姻法》的规定,下列属于结婚形式要件的是()
工程建设项目实施阶段造价控制的核心是()。
某化工厂发生氯气泄漏事故后,应急救援的首要任务是抢救中毒人员和人员疏散,另外一项重要任务是()。
“钢材表面已发生锈蚀且部分氧化皮已经剥落”属于钢材表面锈蚀等级的()级。
预应力混凝土连续梁合龙顺序一般是()。
甲:你不能再抽烟了。抽烟确实对你的健康非常不利。乙:你错了。我这样抽烟已经15年了,但并没有患肺癌,上个月我才做的体检。有关上述对话,以下哪项如果是真的,最能加强和支持甲的意见?()
对于循环队列,下列叙述中正确的是()。
在商场购物中,实体顾客和实体商品之间的联系是()。
Lookatthenotesbelow.Someinformationismissing.YouwillhearamantelephoningHumanResourcesaboutdetailsofo
最新回复
(
0
)