首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序: Private Sub Command1_click() Dim n Ifllextl.Text”123456”Then n=n+1:Print”口令输入错误”&n&”次”
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序: Private Sub Command1_click() Dim n Ifllextl.Text”123456”Then n=n+1:Print”口令输入错误”&n&”次”
admin
2015-05-29
49
问题
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:
Private Sub Command1_click()
Dim n
Ifllextl.Text<>”123456”Then
n=n+1:Print”口令输入错误”&n&”次”
End If
Fnd Sub
希望程序运行时得到左图所示的效果,即:输入口令,单击“确认口令”命令按钮,若输入的口令不是“123456”,则在窗体上显示输入错误口令的次数。但上而的程序实际显示的是右图所示的效果,程序需要修改。下面修改方案中正确的是( )。
选项
A、在Dim n语句的下面添加一句:n=0
B、把Print"口令输入错误"&n&"次"改为Print"口令输入错误"+n+"次"
C、把Print"口令输入错误"&n&"次"改为Print"口令输入错误"&Str(n)&"次"
D、把Dim n改为Static n
答案
D
解析
本题中题干部分的程序之所以会产生不合要求的结果,其原因是在单击事件中的第一条语句为Dim n,这样的话每次单击按钮时触发此事件,都将会执行这条语句,重新定义一个局部变量n并设其默认初值为0。Static语句在过程级别中使用,用于声明变量并分配存储空间,在整个代码运行期间都能保留使用Static语句声明的变量的值,因此此处应该使用Static n来声明变量。
转载请注明原文地址:https://jikaoti.com/ti/Rn60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是______。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFo
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Forn=1To20IfnMod3<>0Thenm=
以下关于焦点的叙述中,错误的是
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()StaticXAsIntegerStaticYAsIntegerCls
计时器控件能有规律的以一定时间间隔触发______事件,并执行该事件过程中的程序代码。
使用ReDimPreserve语句,可以()。
在一个窗体上添加一命令按钮控件,名为Command1,事件过程如下,则执行结果是()。OptionBase1PrivateSubCommand1_Click()Dima(5)AsIntegerDimk
以下声明语句中错误的是
随机试题
下列装饰装修用铝合金中,()广泛用于车辆、船舶、飞机等内部装饰和楼梯、踏板等防滑部位。
公务员
根据计算机网络拓扑结构的分类,Internet采用的是______________拓扑结构。
下列疾病的口腔黏膜基本损害为A、溃疡B、大疱C、白色斑块D、白色网状条纹E、红色萎缩复发性口疮
前列腺新的分区方法将前列腺分为
关于卵巢,错误的描述是
发展循环经济的内容包括()。
Nowonlineprovisionistransforminghighereducation,givingthebestuniversitiesachancetowidentheircatch,openingnewo
Astheplanecircledovertheairport,everyonesensedthatsomethingwaswrong.Theplanewasmovingunsteadilythroughtheair
A、Tolookforcreativeideasofawardingemployees.B、Toexplorestrategiesforloweringproductioncosts.C、Toseeknewapproac
最新回复
(
0
)