首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个Textl文本框,一个Commandl命令按钮,并有以下程序: Private Sub Commandl_click() Dim n IfTextl.Text<>”123456”Then
窗体上有一个Textl文本框,一个Commandl命令按钮,并有以下程序: Private Sub Commandl_click() Dim n IfTextl.Text<>”123456”Then
admin
2013-10-16
62
问题
窗体上有一个Textl文本框,一个Commandl命令按钮,并有以下程序:
Private Sub Commandl_click()
Dim n
IfTextl.Text<>”123456”Then
n=n+l:Print”口令输入错误”&n&”次”
End If
End Snb
希望程序运行时得到左图所示的效果,即:输入口令,单击“确认口令”命令按钮,若输入的口令不是“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/W660FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据字典是对数据定义信息的集合,它所定义的对象都包含于______。
面向对象程序设计中,基于父类创建的子类具有父类的所有特性(属性和方法),这一特点称为类的______。
在结构化程序设计中,不建议使用______。
下列各项中,不是结构化程序基本模块结构的是______。
在窗体上画一个名称为Labell的标签和一个名称为Listl的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Label中显示所选中的项目,如下图所示。请在______和______处填入适当的内容,将程序补充完整。Pr
下列程序的输出结果是______。PrivateSubcommand1_click()a=10:b=20Printa;Spc(5);b;PrintPrintb;SpaCe$(5
以下语句的输出结果是______。PrivateSubCommand1_Click()x=10y=1Printx+y=101;EndSub
在程序中添加一个命令按钮和两个文本框,并在命令按钮中编写如下代码:PrivateSubCommand1_Click()a=Text1.Textb=Text2.Textc=LCase(A.d=UCase(B)Pri
语句Print4+5\6*7/8Mod9的值是______。
下列程序是将数组a的元素倒序交换,即第一个变为最后一个,第二个变为倒数第二个,依此类推。设数组中有8个元素。完成下列程序。PrivateSubOrderChange(a())DimiAsInteger,TempAsIntegerFor
随机试题
(2012年10月)1999年12月20日,中国在推进祖国统一大业方面迈出的重要一步是________。
人才交流的内容主要包括______、______。
_____succeedindoinganything.
气体交换的场所是()。
动脉的主病有
甲将一台电脑出卖给乙,甲将电脑交付给了乙,双方约定,在乙付清全部价款之前,甲保留电脑的所有权。后乙将该电脑以市价出卖给了不知情的丙,丙当场拿走电脑。丙抵押给了不知情的丁,签订了抵押合同,但未办理登记。后丙又将该电脑质押给了戊,交给了戊。对此,以下说法错误的
我国机动车辆保险合同是属于()。
火车驶过长900米的铁路桥,从车头上桥到车尾离桥共用1分25秒,紧接着列车又穿过一条长1800米的隧道,从车头进隧道到车尾离开隧道用了2分40秒,则火车车身长为()。
Wherecouldmyson______thekey?Icouldn’tfindanywhere.
ShoppricesinJunefellatthefastest【C1】______ratesinceatleast2006as【C2】______foughttoattractcustomers,theBritishR
最新回复
(
0
)