首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序: Dim nAs Integer PriVate Sub Timerl_Timer()
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序: Dim nAs Integer PriVate Sub Timerl_Timer()
admin
2019-06-11
29
问题
窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序:
Dim nAs Integer
PriVate Sub Timerl_Timer()
ch=Chr(n+Asc(”A”)):Labell.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/9iN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下列语句:strInput=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是()。
向文本框中输入字符时,下面能够被触发的事件是()o
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是()。
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:DimSaveAllAsStringPrivateSubForm_Load()
在标准模块中用Public关键字定义的变量,其作用域为()。
以下叙述中错误的是()。
(1)在名称为Form1的窗体上添加三个单选按钮,其名称分别为Option1、Option2和Option3(如图1所示),然后通过属性窗口设置窗体和单选按钮的属性,实现如下功能:①窗体标题为“设置单选按钮属性”;②三个单选按钮的标题分别为“按
在考生文件夹中有一个工程文件sjt5.vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元素之和,窗体外观如图所示。程序运行时,矩阵数据被放入二维数组a中。当单击“找矩阵元素最大值”命令按钮时,找出矩阵中最大的数,并在标签Label3中显示。当单击“
(1)在名称为Form1的窗体上添加一个名称为Shapel的形状控件,要求在属性窗口中将其形状设置为椭圆,其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”,窗体上无最大化、最小化按钮。程序运行后的窗体如图
考生文件夹下有一个工程文件sjt5.vbp。在窗体Form1上有两个标题分别是“产生数据”和“重新排列”的命令按钮,有两个标题为“原始数据”和“排列数据”的标签。程序功能如下。①单击“产生数据”按钮,则随机产生20个一位整数,存入数组a中,并同时
随机试题
小儿食管骨性异物错误的取出方法是
患者,男,40岁。摔倒后左肩着地,感左锁骨区疼痛,X线片示左锁骨中段骨折,远近端上下分离,中间有一2.0cm骨折块,直立,尖端指向肺尖部。最佳的治疗方案是
局部用药治疗龋病的常见适应证是
自确定中标人之日起()日内,招标人向监督部门提交招投标情况书面报告。
在成熟期投资的缺点是()。
涂膜防水层应沿找平层分隔缝增设带有胎体增强材料的空铺附加层,其空铺宽度宜为()mm。
“小端次序”的机器上,四字节数据12345678H按字节地址由小到大依次存在为()。
B
NeedforEmphasisonTreatmentAIDSprogramsindevelopingcountriesputtoolittleemphasisontreatment,theWorldHealth
What’sHot,What’sNotfor2006Thisyearmarksnotonlythe50thanniversaryofIRAbutalsothe10thyearofthe"What’sh
最新回复
(
0
)