首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Inte
在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Inte
admin
2009-01-15
67
问题
在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x; End Sub 程序运行后,单击命令按钮,输出结果为
选项
A、2 3 4
B、2 5 9
C、3 5 4
D、2 4 3
答案
2
解析
在过程TCL中,将Integer型变量x定义为静态变量(StatiC),Static语句的格式与Dim语句完全一样,但Static语句只能出现在事件过程,Sub过程或Func- tion过程中,在过程中的Static变量只有局部的作用域,即只能在本过程中可见,但可以和模块级变量传递,即使过程结束后,其值仍能保留。Tcl过程是将变量a的值加上x赋给x,然后输出x的值;第一次调用Tcl过程时,x未赋值,默认为0,所以输出结果为2,第二次调用Tcl过程时,因为x为静态变量,所以它的值为上次调用后的值,即为2,加上a后,x的值变为5,输出结果为5,同理,第三次调用后输出结果为9。
转载请注明原文地址:https://kaotiyun.com/show/pc2p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
多线程是Java程序的________机制,它能同步共享数据、处理不同事件。
设线性表中有2n个元素,算法(),在单链表上实现要比在顺序表上实现效率更高。
下列程序中,实现将封装数据类型Integer和基本数据类型int之间的转换,以及Integer、int类型和String类型之间的转换。请将程序补充完整。程序运行结果如下:123456456源程序文件代码清单如下:
下面的程序是从命令行输入3个数传递到publicstaticvoidmain(Stringargs[])方法中(如javaIsTriangle345),并判断这3个数能否构成三角形的3条边,并显示相应的结果。请在程序的每条横线处填写一个位运
Java的产品主流操作系统平台是Solaris、________________和Macintosh。
需求分析阶段的任务是确定
有一个类A,下列为其构造方法的声明,其中正确的是
数据的逻辑结构有线性结构和【】两大类。
下列关系运算中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是
随机试题
根据法律规定和司法实践,立案的材料来源主要有:________;________;________;________。
组织的构成要素是
A、溶液剂B、溶胶剂C、乳剂D、混悬剂E、乳化剂分散相以离子或分子状态分散的是
某企业2011年新建项目年总成本费用为500万元,销售费用、管理费用合计为总成本费用的15%,固定资产折旧费为50万元,摊销费为30万元,利息支出为15万元,则该项目年经营成本为()万元。
邮包保险的责任从邮包离开保险单所载起运地寄件人处所运往邮局开始。()
ABC公司使用完工百分比来核算长期工程。该项目的整体收入为$700000,预计的成本为$500000,项目为3年。假设第1年应确认的毛利为$65000,则ABC公司第2年可以确认的毛利应为
目前,H省政府办公室出台“放管服”(指简政放权、放管结合、优化服务)改革专项工作方案,在有关民生服务方面,优化办理程序、精简审批事项,并承诺加快建立网上服务平台,实现便捷服务。这样做的根本目的是()。
阅读以下文字,完成以下问题。1988年,一位爱好飞蛾的美国医生,发表了一篇科学论文,论述了夜晚的灯光是如何影响飞蛾的。这是一篇很普通的文章,但在当时,这也是一篇最明确地指出人造光会对动物产生危害的文章,一些针对人造光与动物关系的研究由此产生了。
励精图治对于()相当于()对于错失良机
INTREPID:
最新回复
(
0
)