首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有一个工程文件ylc6.vbp,请在窗体中画一个组合框和一个命令按钮。程序的功能是在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目;如果已有此项,则弹出提示:“已有此项”,之后清除输入的内容。界面如图20所示。 注意:存盘时必
有一个工程文件ylc6.vbp,请在窗体中画一个组合框和一个命令按钮。程序的功能是在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目;如果已有此项,则弹出提示:“已有此项”,之后清除输入的内容。界面如图20所示。 注意:存盘时必
admin
2009-03-17
39
问题
有一个工程文件ylc6.vbp,请在窗体中画一个组合框和一个命令按钮。程序的功能是在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目;如果已有此项,则弹出提示:“已有此项”,之后清除输入的内容。界面如图20所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm。
选项
答案
1.操作步骤 (1)在Visual Basic集成环境中选择“文件”→“打开工程”命令,在对话框中选择 ylc6.vbp工程文件,单击“确定”按钮打开。 (2)选择工具中的ComboBox控件,在窗体中画命名为Comboll的组合控件。在属性窗口分别设置它们的名称、Text属性为空。 (3)在属性编辑框中设置Comboll组合控件的List属性,其初始数据为“语文”、“数学”、“英语”、“物理”、“化学”、“生物”、“历史”、“政治”和“地理”。 (4)在工具箱中选择命令按钮控件,在窗体上拖动创建并命名为Command1,标题为“确定”。 2.行为编码 在代码框选择Command1对象和Click事件,代码如下: Private Sub Command1_Click() For i=0 To Combol. ListCount-1 If Combol.List(i)=Combol.Text Then ’清除输入内容 Combol.Text=" " MsgBok("已有此项") End If Next i End Sub 3.存盘保存 执行“文件”→“保存工程”命令,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm。
解析
(1)这是一道简单的应用题,主要考查ComboBox控件的相关特性、数据的初始化、项目的多少、程序设计中循环结构的编程,以及程序中提示信息对话框的使用。
(2)代码中使用组合控件的ListCount属性,得到控件数据的个数,使用Comboll的 List属性得到Comboll内某项字符中的值。在For...Next循环中将输入的字符串与Comboll内的字符串逐个比较。如果输入的字符串在控件中已存在,则使用MsgBox信息捉示框显示提示信息。
转载请注明原文地址:https://kaotiyun.com/show/zj1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面对形参的说法,正确的是()。
以下各种调试方法中,靠演绎、归纳以及二分法来实现的是()。
Swing允许按自己的要求选择组件的外观和感觉,Swing是通过哪一方法实现该功能的?()
设x和y均为int型变量,则执行下面的循环后,y值为()。publicclassSun{publicstaticvoidmain(Stringargs[]){intx,y
请在下面代码中加入监听器语句【】。importjava.awt.*;importjava.applet.Applet;publicclassSimpleextendsAppletimplementsMouseLi
【】布局管理器能够帮助用户处理两个以至更多的成员共享同一显示空间。
下面OneFrame类创建了一个名为ThisisaFrame的窗口。importjava.awt.*;publicclassOneFrameextendsFrame{publicstaticvoid
如果要区分两个英语单词字符串a和b是否相等(而不计大小写)应该选用的方法是()
下列关于正则表达式的说法,不正确的是
随机试题
关于有效数字的描述,()是不正确的。
由于商标的单一性,同类商标价格获取的难度,使得________应用受到限制()
胃排空的原动力是
辅助生殖技术应包括()
在严格意义上并不能称为先心病的是又称为肺动脉高压性右向左分流综合征的是
男,60岁。可摘局部义齿修复2年,黏膜压痛一周,查缺失,左侧牙槽嵴低平,下颌舌骨嵴处黏膜红肿。如果检查后发现义齿游离端加压翘动明显,其可行的处理方法是()
传染性非典型肺炎临床确诊必须依据的是
A.70~80℃B.40~50℃C.10~30℃D.2~10℃E.0℃
当锅炉锅筒工作压力为0.8~1.6MPa时,锅炉本体水压试验的试验压力为()。
—Andrewwon’tlikeit,youknow.—______?Idon’tcarewhatAndrewthinks!
最新回复
(
0
)