2. 计算机
  3. 窗体上有一个名称为Labell的标签：一个名称为Timerl的计时器，其Enabled和Interva属性分别为True和1000。编写如下程序： Dim nAs Integer Private Sfb Timer1 Timer() ch=Chr(n+As

窗体上有一个名称为Labell的标签：一个名称为Timerl的计时器，其Enabled和Interva属性分别为True和1000。编写如下程序： Dim nAs Integer Private Sfb Timer1 Timer() ch=Chr(n+As

admin2015-12-09  64
问题 窗体上有一个名称为Labell的标签：一个名称为Timerl的计时器，其Enabled和Interva属性分别为True和1000。编写如下程序：
Dim nAs Integer
Private Sfb Timer1 Timer()
ch=Chr(n+Asc(“A”))：Labell．Caption=eh：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声明，是一r窗体级变量；在计时器的Timer事件中每次令n加1，如果超过了4则将其除4取余；即最后循环显示字符“A”、“B”、“C”、“D”。
转载请注明原文地址:https://kaotiyun.com/show/M8Lp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)