首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序代码: Function Sum(n As Integer) Static k As Integer k = k + n + 1 Sum = k End Function Private Sub Form_Click()
有如下程序代码: Function Sum(n As Integer) Static k As Integer k = k + n + 1 Sum = k End Function Private Sub Form_Click()
admin
2020-04-18
62
问题
有如下程序代码:
Function Sum(n As Integer)
Static k As Integer
k = k + n + 1
Sum = k
End Function
Private Sub Form_Click()
Dim i As Integer
Dim s As Integer
For i = 1 To 3
s = s + Sum(i)
Next i
Print s
End Sub
运行程序,单击窗体,输出结果为
选项
A、6
B、9
C、12
D、16
答案
D
解析
当用Static定义k时,如果没有退出程序,每次引用静态变量的数组后,其值将继续保留,作为下次引用时该变量的初始值。当i=1时,调用sum(1),k=0+1+1=2,s=0+2=2;当i=2时,调用sum(2),k=2+2+1=5,s=2+5=7;当i=3时,调用sum(3),k=5+3+1=9,s=7+9=16。退出For循环,输出s为16,故选D项。
转载请注明原文地址:https://kaotiyun.com/show/1yTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有以下程序段,单击Commandl按钮后,屏幕上的输出结果是()。PrivateSubCommand1__Click()Fori=6To9PrintTab(i*i),iNextiEn
如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是( )。
下列合法的变量名是( )。
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是( )。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
下列说法中,错误的是( )。
以下说法中正确的是
软件测试用例包括()。
软件测试的目的是
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
Whenyouarewritingbusinessletters,youneedtonoticethefollowingtips:LimitThemtoOnePageBydefinition,busines
男性患者.发热数月余,在当地按伤寒治疗后热退1周,入院前又开始发热。体温39.5℃,可触及肝、脾在肋下1cm,压痛(±)。白细胞计数1200/mm3,蛋白尿(++),“H”1:30,“0”1:640,ALT300U,HbsAg(-)。此时宜用
经济( )的特征是:经济活动处于最低水平的时期,在这一阶段存在大量的失业,大批生产能力闲置,工厂亏损,甚至倒闭。
通过搜集被试者的各种有关材料间接了解其心理活动的方法是()
打卡式旅游的流行,很大程度上改变了旅行的________和目的。旅游原本是为了寻找乐趣或享受悠闲时光而开展的活动,现在则成了________的打卡盖章,为频繁打卡所支付的时间、精力和金钱等各项成本,让旅游变成一种身心疲惫的负累。填入画横线部分最恰当的
2019年6月,全国发行地方政府债券8996亿元,同比增长68.37%,环比增长195.63%。其中,发行一般债券3178亿元,同比减少28.33%,环比增长117.08%,发行专项债券5818亿元,同比增长540.04%,环比
WhichofthefollowingisTRUE,accordingtothewriter?Findinga’bargainontheInternetwasgettingeasierpartlybecause__
[*]
已知矩阵相似于对角矩阵A.(1)求a的值;(2)利用正交变换将二次型XTBX化为标准形,并写出所用的正交变换;(3)指出曲面XTBX=1表示何种曲面.
Youmaysaythatthebusinessofmarkingbooksisgoingtoslowdownyourreading.Itprobablywill.That’soneofthe【B1】_____
最新回复
(
0
)