首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim n As Integer:Static s As Integer For n=1 To 3 s=s+n Next Print s End Sub 程序运行后,第三次单击命令按
编写如下程序: Private Sub Command1_Click() Dim n As Integer:Static s As Integer For n=1 To 3 s=s+n Next Print s End Sub 程序运行后,第三次单击命令按
admin
2018-10-18
34
问题
编写如下程序:
Private Sub Command1_Click()
Dim n As Integer:Static s As Integer
For n=1 To 3
s=s+n
Next
Print s
End Sub
程序运行后,第三次单击命令按钮Commandl时,输出结果为
选项
A、3
B、6
C、9
D、18
答案
D
解析
Static语句在过程级别中使用,用于声明变量并分配存储空间,在整个代码运行期间都能保留使用static语句声明的变量的值。在本题中连续3次单击命令按钮,第一次单击时输出的s=1+2+3=6。第二次单击时输出的s=6+1+2+3=12,第三次单击时输出的s=12+1+2+3=1 8.
转载请注明原文地址:https://kaotiyun.com/show/RCFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger) DimcAsString
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger) f=1 Fori=1Toxf=f*i Next s=fEndFunctionPrivateSubCommand1
文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ...EndSub其中参数KeyCode的值表示的是发生此事件时(
窗体的左右两端各有1条直线,名称分别为Line1、Line2;名称为Shape1的圆靠在左边的Line1直线上(见图);另有1个名称为Timer1的计时器控件,其Enabled属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停
以下关于控件数组的叙述中,正确的是( )。
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是( )。
设有窗体的Form_MouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) If(Button
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommand1_Click() Dimch$,asciiAsInteger Open"file.txt"ForInpu
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为( )。
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
随机试题
劳动分工原则
下丘脑是较高级的调节内脏活动的中枢。
男性,45岁。酗酒后8小时出现中上腹疼痛,放射至两侧腰部,伴恶心、呕吐。查体:腹部有压痛、肌紧张及两侧腰腹部出现蓝棕色斑,血压75/55mmHg,脉搏110次/分。在诊断尚未确立之前,不应采用的是
患者,女,28岁,双颊起褐色斑片,无瘙痒,2年,伴心烦易怒,口干口苦,舌红苔黄,脉弦。
男,2l岁,因食欲不振,尿黄10天,神志不清,烦躁不安l天入院。查体:皮肤巩膜明显黄染,皮肤可见大小不等瘀斑,神志不清,不能回答问题,呼吸平顺,心肺无异常,肝未触及,腹水征(一),四肢肌张力增高,扑翼样震颤(+),腱反射亢进,踝阵挛(+)。化验:白细胞15
以大城市为中心来考察城市化现象,存在()类型的城市化。
BTO的中文含义是( )。
下列各项中,不会引起留存收益总额发生增减变动的是()。
企业人员招聘的原则包括()
Theprocessby【C1】______ofwhichhumanbeingsarbitrarilymakecertainthingsstandforotherthingsmaybecalledthesymbolic
最新回复
(
0
)