首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。 要求:去掉程序中
考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。 要求:去掉程序中
admin
2019-06-11
81
问题
考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:考生不得修改窗体文件中已经存在的程序。最后,程序按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题项目工程 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Dim n As Integer Private Sub Form_Click() Timer1.Enabled=
True
End Sub Private Sub Form_Load() Timer1.Interval=
10000
Timer1.Enabled=FalSe Text1.ForeColor=0 n=0 End Sub Private Sub Timer1_Timet() n=
n+1
If n Mod 5=0 Then Text1.Text=Time() End If If n Nod 8=
0
Then If Text1.ForeColoE=0 Then Text1.ForeColor=&HFF Else Text1.ForeColor=0 End If End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘
解析
转载请注明原文地址:https://kaotiyun.com/show/FNUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设工程中有Form1、Form2两个窗体,要求单击Form2上的Command1命令按钮,Form2就可以从屏幕上消失,下面的事件过程中不能实现此功能的是
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=Val(InputBox("输入整数"))y=Val
假定有如下程序:PrivateSubFormClick()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1:J=J+N*(N+1)LoopPrintN;JEndSub运行
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:OptionBase0PrivateSubCommand1_Click()DimA1(4)AsInteger,A2(4)AsIntegerFork=0To2A1(k+
下面不是键盘事件的是
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:PrivateSubCommand1_Click()Counter=0Fori=1T04Fori=6To1Step-2Counter=Co
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
关于文件操作,以下叙述中正确的是
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是
设有以下过程:PrivateSubproc(xAsInteger,OptionalyAsInteger)Printx,yEndSub针对此过程,下面正确的过程调用语句是
随机试题
屈伸法是使关节()的方法。
属下丘脑性无排卵的是属垂体性无排卵的是
张丽因与王旭感情不和,长期分居,向法院起诉要求离婚。法院向王旭送达应诉通知书,发现王旭已于张丽起诉前因意外事故死亡。关于本案,法院应作出下列哪一裁判?(2015/3/48)
财会部门或经办人,必须在会计年度终了后的第一天,将应归档的会计档案全部移交档案部门,保证会计档案齐全完整。()
明细账必须逐日逐笔登记,总账必须定期汇总登记。()
关于税收执法监督的说法,正确的是()。
下列说法正确的是()。
健谈对于()相当于()对于开支
Serenity(宁静)isdifficulttofindintoday’sfast-pacedworld.Amomentofcompletecalmseemstobearareandwonderfulfind.
法国大革命结束的标志是()。
最新回复
(
0
)