首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体中画一个名称为L1的标签,其标题为“0”,BorderStyle属性为1;再添加一个名称为Timer1 的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图1-33所示的是程序刚
(1)在名称为Form1的窗体中画一个名称为L1的标签,其标题为“0”,BorderStyle属性为1;再添加一个名称为Timer1 的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图1-33所示的是程序刚
admin
2019-06-11
52
问题
(1)在名称为Form1的窗体中画一个名称为L1的标签,其标题为“0”,BorderStyle属性为1;再添加一个名称为Timer1 的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图1-33所示的是程序刚启动时的情况。程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
(2)在考生文件夹下有一个工程文件sjt4.vbp,要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。而如果单击“显示”按钮,则在窗体上输出所有选中的列表项(如图1-34所示)。
要求:修改列表框的适当属性,使得运行时可以多选,并去掉程序中的注释符,把程序中的?为正确的内容,使其实现上述功能,但不得修改程序中的其他部分。最后把修改后的程序以原来的文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:在代码编辑窗口编写计时器的事件过程。 参考代码: Private Sub Timer1_Timer() L1 = L1 + 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,将列表框的MultiSelect属性值设置为1-simple。 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: For i = 0 To l1.ListCount - 1 If l1.Selected(i) = True Then 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/ojUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上画一个名称为Label1、标题为“列表框的使用”的标签。再画一个名称为List1的列表框,列表中含有5个表项,表项内容分别为“北京”、“山西”、“辽
运行下列程序时,输出的结果是()。PrivateSubForm_Click()Dimxx=Array("Software","and","Hardware","System")Fori=LBound(x,1)ToUBound(x,
以下关于数组的叙述中,错误的是
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为
列表框中被选中的数据项的位置可以通过一个属性获得,这个属性是
假定在图片框Picture1中装入了一个图片,在程序运行中,为了清除该图片(注意,清除图片,而不是删除图片框),应采用的正确方法是
以下可以作为“容器”的控件是
下列关于水平滚动条的叙述中,错误的是
在VisualBasic中,表达式3*2\5Mod3的值是
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于系统软件的是
随机试题
论述人生的社会价值和自我价值的关系。
脑转移瘤多来源于
有慢性失血性贫血的患者,失血至少达到多少可有贫血表现
下列选项中,不属于材料费的是()。
下列属于墨家主张的是()
人民法院可以判决变更的情形是:
3/2,5/7,12/19,31/50,()
设函数z=z(χ,y)由方程χ=f(y+z,y+χ)所确定,其中f(χ,y)具有二阶连续偏导数,求dz.
某大型项目进行到两年时,使用挣值法所需要的三个中间变量的数值分别是:计划值PV为400万元,实际成本AC为200万元,挣值EV为100万元。基于该项目的成本偏差,下列描述正确的是(1),基于该项目的成本绩效指数,下列描述中正确的是(2)。(1)
Apunctualpersonisinthehabitofdoingathingatthe【11】timeandisneverlateinkeepinganappointment.Heknowsthathe
最新回复
(
0
)