首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim m As Integer, n As Integer n=2 For m=1 To 3 Print proc(n); Next m End Sub F
编写如下程序: Private Sub Command1_Click() Dim m As Integer, n As Integer n=2 For m=1 To 3 Print proc(n); Next m End Sub F
admin
2019-03-14
58
问题
编写如下程序:
Private Sub Command1_Click()
Dim m As Integer, n As Integer
n=2
For m=1 To 3
Print proc(n);
Next m
End Sub
Function proc(i As Integer)
Dim a As Integer
Static b As Integer
a=a+1
b=b+1
proc=a * b+i
End Function
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、3 3 3
B、3 4 5
C、3 5 6
D、1 2 3
答案
B
解析
变量b定义为Static即静态变量,它的特点是每次调用都会保留上次的值。程序click事件中调用了3次proc(n),即proc(2):
第一次,a=a+1=0+1=1, b=b+1=0+1=1 , proc=a*b+i=1*1+2=3;
第二次,a=a+1=0+1=1, b=b+1=1+1=2 , proc=a*b+i=1*2+2=4;
第三次,a=a+1=0+1=1, b=b+1=2+1=3 , proc=a*b+i=1*3+2=5;
因此输出的结果为3 4 5。
转载请注明原文地址:https://kaotiyun.com/show/jpFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Forml的窗体上添加一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在程序运行时,当用鼠标右键单击文本框时,弹
对于语句DimVar1,Var2AsString*10,下列说法中正确的是
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下:324376582812985731425364758
支持子程序调用的数据结构是( )。
下列排序方法中,最坏情况下比较次数最少的是( )。
某系统总体结构图如下图所示:该系统总体结构图的深度是( )。
在数据库系统中,用于对客观世界中复杂事物的结构及它们之间的联系进行描述的是
(1)在名称为。Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
随机试题
毛泽东思想紧紧围绕()主题,构成完整科学体系。
感觉评价人员在评价时,相互之间不要_________。
补气药大多能补__________、__________二脏之气。
地产的个别性和不可移动性,决定了土地市场是不完全的市场。()
某企业从设备租赁公司租借一台价格为76万元的设备,总租期和寿命期均为5年,年折现率为8%。按年金法计算,每年末应支付租金()万元。
()要求某一交易日成交的所有交易有计划地安排距成交日相同营业日天数的某一营业日进行交收。
跨国公司在对海外子公司财务报表进行并表处理时遇到的汇率风险类型属于()。
AnemergencyboardmeetingatthecorporateheadquartersofEllisonMonroelastedlongerthananticipatedyesterdayafternoon,as
Childrentodayspendmoretimestareatcomputerand(1)______TVscreensbothatschoolandathome.Scientific(2)______studi
SUNDAY,MONDAY,TUESDAY,WEDNESDAY,THURSDAY,FRIDAY,SATUDAYWhatdaycomesthreedaysafterthedaywhichcomestwodaysafter
最新回复
(
0
)