首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Text1、Text2两个文本框及一个命令按钮 Command1,编写下列程序: Dim YAs Integer Private Sub Command l_Click() Dim x As Integer
窗体上有Text1、Text2两个文本框及一个命令按钮 Command1,编写下列程序: Dim YAs Integer Private Sub Command l_Click() Dim x As Integer
admin
2020-02-27
70
问题
窗体上有Text1、Text2两个文本框及一个命令按钮
Command1,编写下列程序:
Dim YAs Integer
Private Sub Command l_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
p1=x+y
End Function
Private Functionp2(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://kaotiyun.com/show/jTTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为HSemlll的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是()。
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(Str(c))Fori=1To4 Print NextEndSub程序
设窗体上有1个垂直滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是()。
以下数组定义语句中,错误的是( )。
下面是求最大公约数的函数的首部:Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是( )。
下面变量定义中错误的是
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图所示。运行程序,单击“读数据”按钮,读入文件中的数据到字符串变量中并显示在Label2标签中。单击“排序”命令按钮时,对读入的数据从小到大进行排序,并将排序结果在窗体的Label4控件中显示。
软件生存周期中,解决软件“怎么做”的阶段是()。
(1)在名称为Form1,标题为“选课”的窗体上添加一个复选框数组,名称为CH1,共有四个复选框,按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”,其中“语文”、“计算机”复选框处和选中状态下,程序运行时的窗体如图所示。请按要求添加控件并设置相应
随机试题
国际通行的贷款五级分类中,()为不良贷款。
中熔铸造包埋材料中与凝固膨胀有关的成分主要是
慢性肾炎中医常见证型有
女,72岁。摔伤右髋部,既往全身情况良好。查体:右下肢缩短,外旋畸形,下肢轴向叩击痛阳性。最可能的诊断是()
在土地登记公开查询中,“土地登记结果”一般指()。
相对于土地登记的一般程序,以下()不是初始土地登记程序的特殊性。
采用资本资产定价模型法计算普通股资金成本,需用到的相关数据有()。
设f(x)为[0,1]上的单调增加的连续函数,证明:
Theyear1609wasnoteworthyfortwoastronomicalmilestones.ThatwaswhenGalileobuilthisfirsttelescopesandbeganhismet
A、Problemswithlivinginanapartment.B、Thechancetofindapart-timejob.C、Thecostofrentnearuniversities.D、Asearchf
最新回复
(
0
)