首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个文本框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
59
问题
窗体上有两个文本框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全国计算机二级
相关试题推荐
在窗体上画一个名称为List1的列表框,一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是_________。
下列叙述中,不属于数据库系统的是
在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timerl,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False。程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操
假定定义了一个记录类型,名为Rt,同时建立了一个名为Sp.txt的文件,然后编写如下的程序段:DimRvAsRtr1=Len(Rv)Open"Sp.txt"ForRandomAs#1x=LOF(1)n
在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:PrivateFunctionfun(ByValmAsInteger)IfmMod2=0Then
在数据库管理系统提供的数据语言中,负责数据的完整性、安全性的定义与检查以及并发控制、故障恢复等功能的是
在窗体上画两个文本框,然后编写程序。程序运行后,如果在第一个文本框中输入A、B、C、D或a、b、c、d,则在第二个文本框中显示EFDH。请完善下列程序。PrivateSubForm_Load()ShowText1.
使用PublicConst语句声明一个全局的符号常量时,该语句应放在______。
以下声明语句中,错误的是______。
随机试题
下列日常生活的说法,不正确的是()。
工作转速为1500r/min的转子,其振动频率为( )Hz。
如何正确把握科学社会主义的一般原则?
男性,18岁,2个月前,因急性脓胸经多次胸腔穿刺抽脓及抗菌治疗后,仍有低热、消瘦,胸部X片右胸仍可见有包裹性脓腔,入院后行胸腔闭式引流术,每日引流脓液30~50ml,胸片及胸部CT显示右下胸部有一10cm×6cm残腔,壁厚约2mm,未见钙化,肺内未见病变,
患儿,5岁,因支气管炎住院治疗,护士在帮助患儿服止咳药时应注意()。
投资者对房地产内部使用功能的变动,体现了投资者对房地产投资()的重视。
甲公司于2008年7月依法成立,现有数名推荐的董事人选。根据公司法律制度的规定,下列人员中,不能担任公司董事的有()。
试述终身教育思潮。
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1Open"c:\f2.txt"ForOut
A、Youwillbedelighted.B、Youwillnotbeaffected.C、Youmayfeeldepressed.D、Youwillfeellonely.A短文提到,有一个真正快乐的人在身边能让你心情愉快
最新回复
(
0
)