首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval 属性分别为True和1000。编写如下程序: Dim nAs Integer Private Sub Timer1 Timer
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval 属性分别为True和1000。编写如下程序: Dim nAs Integer Private Sub Timer1 Timer
admin
2020-04-18
18
问题
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval
属性分别为True和1000。编写如下程序:
Dim nAs Integer
Private Sub Timer1 Timer()
ch:Chr(n+Asc(”A”)):Label1.Caption=ch:n=n+1:n=n Mod 4
End Sub
运行程序,将在标签中
选项
A、不停地依次显示字符“A”、“B”、“C”、“D”,直至窗体被关闭
B、依次显示字符“A”、 “B”、 “C”、 “D”各一次
C、每隔1秒显示字符“A”一次
D、每隔1秒依次显示26个英文字母中的一个
答案
A
解析
本题中的变量n在窗体的声明段使用Dim声明,是一个窗体级变量;在计时器的Timer事件中每次令n加1,如果超过了4则将其除4取余;即最后循环显示字符“A”、“B”、“C”、“D”。
转载请注明原文地址:https://kaotiyun.com/show/CcTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使窗体左上角不显示控制框,需设置为False的属性是( )。
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger) SelectCaseIndex Case0 Text1(1).
单击命令按钮执行以下程序,则输出结果为()。PrivateSubCommandl_Click()DimxAsInteger,yAsIntegerx=14:y=48CallProc(x,y)Printx;yE
下面不属于软件设计阶段任务的是
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Tlextl"
(1)在名称为Forml的窗体中面一个名称为L1的标签,其标题为“0”,BordeiStyle属性为1;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图3一170所示的是程序刚
以下变量名中合法的是( )。
下列关于线性表的叙述中,不正确的是()。
下列程序执行后,变量a的值为()。Dima,b,C,dAsSinglea=10:b=20:c=40Ifb>aThend=a:a=b:b=dEndIfIfc>aThen
设有变量声明为“DimaDateAsDate”,则能为变量aDate正确赋值的表达方式是()。
随机试题
财政支出非均衡增长模型有何含义?
申报已上市销售疫苗变更新的佐剂属于三类注册的申请中药材的代用品属于三类注册的
A.阿米卡星B.红霉素C.土霉素D.阿昔洛韦E.利福喷丁属于抗结核药的为()。
根据《德国民法典》规定,下列说法中正确的是()。
下列关于基底检验说法不正确的是()。
人力资源的能动性特征不包括()。
市场调查报告的典型性主要体现在()
国家强制力并不是保障法律实施的唯一力量,法律的实施还要依靠公民的()、道德观念、纪律观念等因素。
除了企业购买外,过去5年中购买一辆新的刚刚出厂的汽车平均价格增长了30%。在同样时期中,购买汽车的开支占家庭平均预算的比例并未发生变化。因此过去的5年中家庭平均预算一定也增加了30%。以上论述依据下面哪个假设?()
Publicimage【C1】______tohowacompanyisviewedbyitscustomers,suppliers,andstock-holders,bythefinancialcommunity,by
最新回复
(
0
)