编写如下程序： Private Sub Command1_Click() Dim n As Integer Static s As Integer For n = 1 To 3 s = s + n Next Pri

admin2018-09-19 30

问题编写如下程序：
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
程序运行后，第三次单击命令按钮Command1时，输出结果为

选项 A、3
B、6
C、9
D、18

答案D

解析 Static修饰的变量在事件退出后保留原值。三次单击命令按钮Command1相当于对s进行了三次累加赋值。选D。

转载请注明原文地址:https://jikaoti.com/ti/evm0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：PrivateSubCommand1_Click()DimsAsDoubles=0：i=1DoWhilei
窗体上有1个名称为Command1的命令按钮；1个名称为List1、没有列表项的列表框。编写如下程序：PrivateSubCommand1_Click()DimXAsString，sAsString，tempAsString
现有如下一段程序：PrivateSubCommand1_Click()x=UCase(InputBox("输入："))SelectCasexCase"A"To"C"Print"考核通过!"Case"D"Print"考核
设窗体上有1个名称为HScrol11的水平滚动条，其Max、Min属性分别设置为100、1：有2个名称分别为Option1、Option2的单选按钮，其标题分别为“30”、“50”；还有下面程序代码：PrivateSubOption1_Clic
窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程：PrivateSubCommand1_Click()Fori=0
窗体上有1个Timerl计时器，1个Shapel形状控件，还有下面程序代码：DimflagAsBooleanPrivateSubTimer1Timer()PrivateSubForm_Load()
在窗体上画1个命令按钮，并编写如下事件过程：PrivateSubCommand1Click()Dima(3，3)Form=1To3Forn=1To3Ifn=mOrn=4-mThena(m，n)=m+n
设有下面的语句：PrintIIf(x>0，1，Ilffx
假定有以下通用过程：FunctionFun(nAsInteger)AsIntegerx=n*n：Fun=x-11EndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSu

随机试题

六淫共同致病特点，不具有
患者，男，65岁。进行性加重排尿困难2年余，B超示前列腺增大，以中叶增生为主，测得残余尿200ml。针对此患者，最好采取的治疗是
患者，女，29岁。诊断哮喘5年。近年来每当春季给花园除草后即出现咳嗽、咳痰伴哮喘发作，其可能的过敏原是
某施工企业准备将一项发明创造申请专利，导致该发明创造新颖性丧失的情形是()。
()是样品试制阶段对供应商出现质量问题的主要解决方法。
一、注意事项　　1．申论考试，与传统作文考试不同，是对分析驾驭材料的能力、解决问题能力、语言表达能力的测试。　　2．作答参考时限：阅读材料40分钟，作答110分钟。　　3．仔细阅读给定的资料，按照后面提出的“申论要求”依次作答。二、给定资料　　　
辨析：宣告失踪是否是构成性规则。
甲下班时误将同事的同款电脑当成自己的电脑带回家。甲对该电脑的占有属于()。(2015一专一30)
下列叙述中错误的是(　　)。
A、Itisraining.B、Iliketoday.C、It’sFriday.D、Wonderful.C题目问：“今天星期几?”对于这类问题，需要明确回答出具体的时间。C)“今天星期五”，符合题意。

最新回复(0)

编写如下程序： Private Sub Command1_Click() Dim n As Integer Static s As Integer For n = 1 To 3 s = s + n Next Pri

二级VB

NCRE全国计算机二级

窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：PrivateSubCommand1_Click()DimsAsDoubles=0：i=1DoWhilei

窗体上有1个名称为Command1的命令按钮；1个名称为List1、没有列表项的列表框。编写如下程序：PrivateSubCommand1_Click()DimXAsString，sAsString，tempAsString

现有如下一段程序：PrivateSubCommand1_Click()x=UCase(InputBox("输入："))SelectCasexCase"A"To"C"Print"考核通过!"Case"D"Print"考核

设窗体上有1个名称为HScrol11的水平滚动条，其Max、Min属性分别设置为100、1：有2个名称分别为Option1、Option2的单选按钮，其标题分别为“30”、“50”；还有下面程序代码：PrivateSubOption1_Clic

窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程：PrivateSubCommand1_Click()Fori=0

窗体上有1个Timerl计时器，1个Shapel形状控件，还有下面程序代码：DimflagAsBooleanPrivateSubTimer1Timer()PrivateSubForm_Load()

在窗体上画1个命令按钮，并编写如下事件过程：PrivateSubCommand1Click()Dima(3，3)Form=1To3Forn=1To3Ifn=mOrn=4-mThena(m，n)=m+n

设有下面的语句：PrintIIf(x>0，1，Ilffx

假定有以下通用过程：FunctionFun(nAsInteger)AsIntegerx=n*n：Fun=x-11EndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSu

六淫共同致病特点，不具有

患者，男，65岁。进行性加重排尿困难2年余，B超示前列腺增大，以中叶增生为主，测得残余尿200ml。针对此患者，最好采取的治疗是

患者，女，29岁。诊断哮喘5年。近年来每当春季给花园除草后即出现咳嗽、咳痰伴哮喘发作，其可能的过敏原是

某施工企业准备将一项发明创造申请专利，导致该发明创造新颖性丧失的情形是()。

()是样品试制阶段对供应商出现质量问题的主要解决方法。

辨析：宣告失踪是否是构成性规则。

甲下班时误将同事的同款电脑当成自己的电脑带回家。甲对该电脑的占有属于()。(2015一专一30)

下列叙述中错误的是( )。

A、Itisraining.B、Iliketoday.C、It’sFriday.D、Wonderful.C题目问：“今天星期几?”对于这类问题，需要明确回答出具体的时间。C)“今天星期五”，符合题意。

下列叙述中错误的是(　　)。