首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有两个标题分别为“添加”和“退出”的命令按钮,一个内容为空的列表框List1。请画一个标签,其名称为Label1,标题为“请输入编号”;再画一个名称为Text1,初始值为空的文本框,如图7所示。程序功能
在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有两个标题分别为“添加”和“退出”的命令按钮,一个内容为空的列表框List1。请画一个标签,其名称为Label1,标题为“请输入编号”;再画一个名称为Text1,初始值为空的文本框,如图7所示。程序功能
admin
2019-06-20
59
问题
在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有两个标题分别为“添加”和“退出”的命令按钮,一个内容为空的列表框List1。请画一个标签,其名称为Label1,标题为“请输入编号”;再画一个名称为Text1,初始值为空的文本框,如图7所示。程序功能如下:
①系统启动时,自动向列表框添加一个编号信息“a0001”。
②系统运行时,在文本框Text1中输入一个编号,并单击“添加”按钮时,如果该编号与已存在于列表框中的其他编号不重复,则将其添加到列表框List1已有项目之后;否则,将弹出“不允许重复输入,请重新输入!”对话框,单击该对话框中的“确定”按钮,可以重新输入。
③单击“退出”按钮,则结束程序运行。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开考生文件中的本题工程文件sjt4.vbp,如表12—5在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: List1.AddItem"a0001" For i=0 To List1.ListCount-1 Lfist1.ListIndex=I:List1.AddItem Text1.Text End 步骤3:按要求将文件保存至考生文件夹中。
解析
若要在系统启动时,自动向列表框添加一个编号信息“a0001”,需要在窗体的Load事件中调用列表框的AddItem方法向列表框中添加列表项。
在“添加”按钮的单击事件中,需要判断输入的值是否在列表框中已存在,为了实现这个功能,需要遍历整个列表框,其循环条件为For i=0 To List1.ListCount-1;在循环中首先令ListIndex属性值为i,这样第i个列表项的内容就是列表框的Text属性值,可以与文本框中的内容进行比较,若已经存在则弹出提示信息,并退出事件过程,若循环结束后还没有重复,则调用列表框的AddItem方法将文本框的内容加入列表框。
在“退出”按钮的单击事件过程中,使用End语句结束整个程序的运行。
转载请注明原文地址:https://kaotiyun.com/show/GfUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为
下列程序段不正确的是()。
如图2所示,在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1__________TextTime.Text=Time
下面的数写成普通十进制数是()。8.6787E+8
软件设计中模块划分应遵循的准则是
以下关于VB的叙述中,错误的是
已知a=6,b=15,c=23,则语句PrintSgn(a+bMod6-c\a)&a+b的输出结果为
有数据定义语句:DimX,YAsInteger以上语句表明
以下关于事件、事件驱动的叙述中,错误的是
在窗体上画一个文本框,名称为Text1(可显示多行),然后冉画三个命令按钮,名称分别为Command1、Command2和Command3,标题分别为“读数”、“统计’,和“存盘”,如图2.67所示。程序的其功能是:单击“读数”按钮,则把考生目录下的in5
随机试题
积极进取就是要________,追求发展,争取进步。
主动脉弓离断解剖分型,说法错误的是
证属()治法宜()
A.补体结合试验阳性B.甲胎蛋白阳性C.右上腹绞痛及黄疸D.穿刺抽出棕褐色脓液E.突发寒颤高热,肝区疼痛,肝肿大细菌性肝脓肿的特点是
某企业连续n年,每年年初向银行借贷A万元,借款年利率为r,每半年复利计息,则第n年末一次归还贷款额的正确表达式为()。
根据《期货公司管理办法》,期货公司董事长和总经理不得由一人兼任。()
经营风险指企业未使用债务时经营的内在风险,它是企业投资决策的结果,表现在资产息税前利润率的变动上。()
统计抽样应同时具备的两个条件是()。
国内旅行社的经营范围,仅限于()。
TowhichcountrydotheRodong1missilesbringthemostthreat?
最新回复
(
0
)