首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
19
问题
窗体上有一个名称为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://jikaoti.com/ti/GQx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列操作说明中,错误的是( )。
有如下程序:PrivateSubForm_Click()DimSAsStringS=InputBox("请输入一个字符串:")Fori=1ToLen(S)\2IfMid(S,
以下关于文件的叙述中,错误的是
下面程序运行时,单击窗体后,窗体上显示的结果是()。PrivateSubForm_Click()DimiAsIntegerDimsumAsLongDimtAsLongt=1:sum=0Fori=1
下面程序运行时,若输入"VisualBasicProgramming",则在窗体上输出的是( )。PrivateSubCommand1_Click() Dimcount(25)AsInteger,chAsString ch=U
设有如下通用过程:PublicSubFun(a()AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub在窗体上画一个名称为Text1的文本框和一个名称为Comman
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Tlextl"
以下叙述中错误的是()。
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:PrivateSubCommand1_Click()Dimcount(10)AsInt
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是( )。
随机试题
炭疽毒素毒性作用主要是直接损伤()
糖皮质激素的主要不良反应有:
以下不属于参与建设项目环境保护验收的单位是()。
科研用蝴蝶标本
期货公司和从事中间介绍业务的证券公司应当在中国金融期货交易所为投资者办理股指期货开户手续。()
如何理解教学的含义?
以下叙述中,错误的是()
Whendoesthisconversationmostprobablytakeplace?
Whoistheman?
SpeakerA:I’vegotafeverandareallybadheadache.SpeakerB:______
最新回复
(
0
)