首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上画一个标签,其名称为Labl;再画一个列表框,其名称为Ll,通过属性窗口向列表框中添加若干项目,每个项目的具体内容不限,编写适当的事件过程。程序运行后,如果双击列表框中的任意一项,则把列表中的项目数在标签中显示出来。程序运行情况如
在名称为Forml的窗体上画一个标签,其名称为Labl;再画一个列表框,其名称为Ll,通过属性窗口向列表框中添加若干项目,每个项目的具体内容不限,编写适当的事件过程。程序运行后,如果双击列表框中的任意一项,则把列表中的项目数在标签中显示出来。程序运行情况如
admin
2013-10-18
69
问题
在名称为Forml的窗体上画一个标签,其名称为Labl;再画一个列表框,其名称为Ll,通过属性窗口向列表框中添加若干项目,每个项目的具体内容不限,编写适当的事件过程。程序运行后,如果双击列表框中的任意一项,则把列表中的项目数在标签中显示出来。程序运行情况如图2-197所示。程序中不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
步骤1:新建一个”标准EXE”工程,在窗体Forml中加入一个列表框,在属性设置窗口中将其Name属性设置为Ll,在其List属性中任意添加四个项目。注意:每输入完一项后按<Ctrl+Enter>键换行再输入下一项。在窗体上再画出一个标签,名称为Labl。 步骤2:打开代码编辑窗口,编写列表框的DblClick事件过程: 参考代码: Private Sub L1_DblClick( ) Labl.Caption=L1.ListCount End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/6HQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有下列循环:x=1Dox=x+2PrintxLoopUntil【】要求程序运行时执行3次循环体,请填空。
为计算a“的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLongDimPAsLongP=aFork=lT0nP=P*aNextkp
设有如下通用过程:PubficFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertstr=“”strL=Len(xStr)i=1DoWhilei
在考生文件夹中有工程文件sj5.vbp及其窗体文件sj5.frm,该程序是不完整的,请在有“?”的地方填入正确内容,然后删除“?”及所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在名称为Forml的窗
以下关系表达式中,其值为True的是______。
若要设置定时器控件的定时时间,需设置的属性是______。
将代数式转换成程序设计中的表达式为【】。
下面______不是VtsualBasic的数据类型。
不在VisualBasic6启动时的基本控件集中的是______。
设A=2,B=-4,则表达式3*A>5OrB+8>0的值是______。
随机试题
李某在某市东城区开了一家大亨娱乐公司,2007年文化局和公安局以该公司在经营活动中有色情活动为由,对其处以5000元的罚款。李某不服,以市文化局为被告向人民法院提起了行政诉讼。请回答下列问题:一审中原告申请撤诉,被人民法院裁定准许后,在法定起诉期内又起
文学典型
肩关节脱位时最容易脱出的方向是
某县一化工厂有生产科、技术科、销售科、安全科和工会等。2006年5月3日,该厂氨气管道发生泄漏,3名员工中毒。在事故调查时,厂长说:因管道腐蚀造成氨气泄漏,为不影响生产,厂里组织了几次在线堵漏,但未成功,于是准备停车修补;生产副厂长说:紧急停车过程中,员工
背景材料:某工程项目,项目经理部为了控制原材料、构配件的质量,建立了工地实验室,制定如下管理制度:(1)项目经理部必须严格控制工程进场的质量、型号、规格。在供货商提供了材料检验报告后,方可与供方签订供应合同;(2)试验室在项目
“四德教育”的核心是()。
(x-y)10的展开式中,x7y3的系数与x37的系数之和等于___________________。
下列关于Serv-UFTP服务器安装、配置的描述中,错误的是()。
下列关于接入技术的描述中,正确的是()。
Whoistheapplicant?HowlonghadtheapplicantbeenengagedinEFLlanguageteaching?Nearly______
最新回复
(
0
)