首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序: Dim n As Integer Private Sub Timer1_Timer()
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序: Dim n As Integer Private Sub Timer1_Timer()
admin
2019-03-08
26
问题
窗体上有一个名称为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
解析
本题中的变量n在窗体的声明段使用Dim声明,是一个窗体级变量;在计时器的Timer事件中每次令n加1,如果超过了4则将其除4取余;即最后循
转载请注明原文地址:https://jikaoti.com/ti/4pm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在过程A中用语句:Callproc(a,b)调用下面的过程PrivateSubproc(bAsInteger,ByValaAsInteger)a=a+1b=b*2EndSub则调用结束后
窗体上有一个名称为Text1的文本框,要求在获得焦点时选中文本框中所有内容,以下能实现该功能的事件过程是
在窗体上画一个名称为Command1的命令按钮,然后编写以下程序代码:OptionBase1PrivateSubCommand1_Click()DimdataAsVariant,mAsInteger,nAsInteger
假定在某个事件过程中需要计算:y=3!+5!的值,下面最好的设计是
以下有关表达式的说法中,正确的是
在窗体上画一个名称为Command1的命令按钮,然后编写其Click事件过程代码如下:PrivateSubCommand1_Click()DimiAsInteger,numAsIntegerDoFori=1
下面关于组合框Cb1的叙述中正确的是
在窗体Form1上画一个名称为Command1的命令按钮,编写如下程序代码:PrivateTypestusnAsString*20classAsString*20EndTypePrivateSubCommand1
在数据库管理系统提供的数据语言中,负责数据的查询、增加、删除和修改等操作的是
(1)在名称为Form1的窗体上添加一个名称为Com.mahd1的命令按钮(如图1所示),然后通过属性窗口设置窗体和命令按钮的属性,实现如下功能:①窗体标题为“设置按钮属性”;②命令按钮的标题为“等级考试”;③程序运行后,命令
随机试题
肝中富含的LDH同工酶是
A.<一4℃B.<4℃C.15~35℃D.50~60℃E.35~40℃能致害虫死亡的低温区是
世界上最早的关于人体实验的国际性医德文献是
施工质量事故发生的原因有()。
甲同学打扫卫生时打碎了一盘玻璃杯,乙同学偷吃时打碎了一个玻璃杯,处于他律道德阶段的儿童会以为()。
某种型号的手机由于进货价降了10%,使得利润提高了18%,那么,原来经销手机的利润率是多少?()
假定你刚庆祝完19岁生日。你富有的叔叔为你设立了一项基金,将在你30岁时付给你150000美元。如果贴现率是9%,那么今天这个基金的价值是多少?
Supposeoneofyourclosefriends,Mr.Zhang,hasbeenhospitalizedforoneweek.Writealetterofconsolationtohim.Yourwri
KingJuanCarlosofSpainonceinsisted"kingsdon’tabdicate,theydieintheirsleep."Butembarrassingscandalsandthepopul
WithinfifteenyearsBritainandothernationsshouldbewellonwiththebuildingofhugeindustrialarchitecturesfortherecy
最新回复
(
0
)