首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序: Dim n As Integer Private Sub Timer1_Timer() ch=Chr(
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序: Dim n As Integer Private Sub Timer1_Timer() ch=Chr(
admin
2020-07-22
101
问题
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序:
Dim n As 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
解析
Asc函数返回字符的ASCII,Chr函数将数值转换成相应的ASCII码字符。计时器间隔Interval属性设置为1000,则计时器事件每1秒钟发生一次。n的值每次调用计时器事件过程都会加1,n=n Mod 4又会使n值只能为0、1、2、3,因此程序运行后每1秒Label1标签将依次显示"A"、"B"、"C"、"D"。
转载请注明原文地址:https://kaotiyun.com/show/6jHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为"VBProgramming"。运行程序后,选中其中的"VB",并执行如下事件过程:PrivateSubCommand1_Click()
为了清除列表框中指定的项目,应使用的方法是( )。
以下不属于VisualBasic数据文件的是
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(Inpu
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Text1文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一项添加到List1列表框中(如图所示)
软件设计中模块划分应遵循的准则是()。
在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:PrivateSubCommand1_Click() CD1.DialogTitle="打开文件" CD1.InitDir="C:" CD1.Filte
下列叙述中正确的是( )。
与数学式子对应的VisualBasic表达式是
对于循环队列,下列叙述中正确的是
随机试题
运用实验法搜集数据时()。
Moviesusedtobeshowninanopenspaceinourtown,withaudience______onbenches,chairsorboxes.
A.脂/水分配系数与毒效应B.电离度与毒效应C.挥发度和蒸气压与毒效应D.绝对毒性和相对毒性与毒效应E.分散度与毒效应苯的沸点80.1℃,在常温下容易挥发,形成较大的蒸气压,易经呼吸道吸收()
下列可诊断为不孕症的是
外商投资的有限责任公司的股东首次出资额应当符合法律、行政法规的规定,其余部分应当自公司成立之日起2年内缴足,其中,投资公司可以在几年内缴足?()。
房屋租赁合同期限不得超过()年。
某企业本年度利润总额8万元,年末结账后资产总额22万元,负债总额8万元,资本公积2万元,盈余公积1万元,未分配利润1万元,则实收资本为()万元。
政府在对公共物品制定价格进行管理时,应遵循的原则有()。
实质性脏器破裂腹腔穿刺液的性质是()。
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好“tStud”、“tCourse”、“tScore”三个关联表对象和一个空表“tTemp”。试按以下要求完成设计:创建一个查询,查找“02”院系的选课学生信息,输出其“姓名”、“课
最新回复
(
0
)