首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Forml的窗体中面一个名称为L1的标签,其标题为“0”,BordeiStyle属性为1;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图3一170所示的是程序刚
(1)在名称为Forml的窗体中面一个名称为L1的标签,其标题为“0”,BordeiStyle属性为1;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图3一170所示的是程序刚
admin
2018-09-19
36
问题
(1)在名称为Forml的窗体中面一个名称为L1的标签,其标题为“0”,BordeiStyle属性为1;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图3一170所示的是程序刚启动时的情况。程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
(2)在考生文件夹下有一个工程文件sit4.vbp,要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。而如果单击“显示”按钮,则在窗体上输出所有选中的列表项(如图3—171所示)。
要求:修改列表框的适当属性,使得运行时可以多选,并去掉程序中的注释符,把程序巾的?改为正确的内容,使其实现上述功能,但不得修改程序巾的其他部分。最后把修改后的程序以原来的文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:在代码编辑窗口编写计时器的事件过程。 参考代码: Private Sub Timerl Timer() Ll = L1 + 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sit4.vbp,将列表框的MultiSelect属性值设置为1.simple。 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: For i=0 To 11.ListCount—1 If 11.Selected(i) =True Then 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/38m0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设在窗体上有一个名称为Check1的复选框数组,并有以下事件过程:PrivateSubCheck1_Click(IndexAsInteger) …EndSub则下面叙述中错误的是( )。
设有语句:Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是( )。
为了用形状控件画出不同的图形,应设置的属性是
VB应用程序不能把一个二维表格中的数据存入文件
如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是
下面描述中不属于数据库系统特点的是
设:a=12,b=5,c=7,表达式x=(a\c+aModb)+Int(13/5)的值是( )。
下面对类-对象主要特征描述正确的是
支持子程序调用的数据结构是( )。
随机试题
我是你雪被下古莲的胚芽;________。
控制急性阿米巴痢疾的首选药是
对肯定诊断及早期诊断最有价值的是
根据《中华人民共和国土地增值税暂行条例》的规定,纳税人转让房地产所取得的收入包括()。
贸易保护大量地存在于当今的国际贸易活动中,国家间的贸易保护一般通过贸易壁垒的形式,任何一种用以阻碍( )的保护主义措施都是贸易壁垒。
有经验的老师会发现,学生的个体身心发展并不是持续快速发展的。他们的发展往往具有两个高峰期,第一个高峰期是在个体出生后的第一年中,第二个高峰期则是出现在青春期。这种现象体现了个体身心发展的()
该厂今年生产的全部甲产品成本实际降低率为()。
像“××集团举行周年庆典,您的手机号码获得了10万元大奖”这类并不高明的手机诈骗短信,即使经媒体曝光,仍然一再出现。职业骗子宁肯使用低劣的诈骗短信,也不去设计一些更具欺骗性、更易让人上当的短信,只能说明骗子太笨、太不敬业了。以下哪一项陈述如果为真,最能质疑
______burningcoal,oilandgasolineareresponsiblefortheglobingwarming?______thegovernmentshouldbackupinvestorswit
SECTION2Questions11-20Questions11-13CompletethefollowinginformationusingONEwordforeachgap.Thespeakerrecommends
最新回复
(
0
)