首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
21
问题
窗体上有一个名称为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全国计算机二级
相关试题推荐
有如下程序:PrivateSubForm_Click()DimiAsInteger,a(10)AsIntegerDimp(3)AsIntegerk=5Fori=0To10a(
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有2个标题分别是“读数据"和“统计”的命令按钮,1个名称为Text1的文本框,2个标签控件,如图3.31所示。程序功能如下:1)单击“读数据”按钮,则将考生文件夹下in5.dat文件
下面程序运行后,语句“Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Doi=i+1F
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Tlextl"
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:PrivateSubCommand1_Click()Dimcount(10)AsInt
下列操作中不能向工程中添加窗体的是()。
已知变量x、y为整数型,且x=4,y=12,s为字符串型,且s=a,LblOk为标签控件,下列赋值语句不合法的是()。
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
在程序运行时,不会引发窗体Resize事件的操作是
语句PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")的输出结果是()。
随机试题
从牙体的纵剖面可见组成牙体硬组织下列各项中是哪些
TMP是
当细胞的绝对不应期为2.0ms时,理论上该细胞每秒钟所能产生的动作电位次数不可能超过
适用包胃溶性薄膜衣片的材料是()。
工程量清单中开列的工程量是()。
下列数据为某医院室内装修工程验收时,室内环境污染物浓度检测结果,其中达到《民用建筑工程室内环境污染控制规范》GB50325验收标准的是()。
某出版社与一畅销书作者正在洽谈新作出版的事宜,预计出版该书的固定成本总额为70万元,单位变动成本为10元/册;同时与作者约定,一次性支付稿酬100万元,另按销售量给予售价10%的提成。若预计该书的销售量为40万册,为实现税前目标利润150万元,该书的售价应
在证券的市场组合中,所有证券的β系数的加权平均数等于1。()
行政诉讼当事人:指因具体行政行为发生争议,以自己的名义到人民法院起诉、应诉(即参加诉讼),请求人民法院保护自己的权益,并受法院裁判约束的公民、法人和行政机关或其他组织。下列不属于行政诉讼当事人的一项是( )。
Despitetheextremeenvironment,Australia’siconicLakeEyreBasinishometoarangeofaquaticanimals(水生物)—includingfish.I
最新回复
(
0
)