首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Combol的组合框,画两个名称分别为Label1和Label2及Caption,属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加
在窗体上画一个名称为Combol的组合框,画两个名称分别为Label1和Label2及Caption,属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加
admin
2013-01-23
72
问题
在窗体上画一个名称为Combol的组合框,画两个名称分别为Label1和Label2及Caption,属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加到组合框的列表中,并在Label2中给出提示“已成功添加输入项”,如图16-3所示;如果存在,则在Label2中给出提示“输入项已在组合框中”。请在【 】、【 】和【 】处将程序补充完整。
Private Sub Comhel【 】(KeyAscii As Integer)
If KeyAseii=13 Then
For i=0 To Combol. ListCount-1
If Combol. Text=【 】Then
LabelCaption="输入项已在组合框中"
Exit Sub
End If
Next i
LabelCaption="已成功添加输入项"
Combol.【 】Combol. Text
End If
End Sub
选项
答案
KeyPress ,combol. List(i) ,AddItem
解析
当KeyAscii为13时,表示按下回车键若要组合框控件接收一个回车事件,则要使用Combol_KeyPress事件。ListCount属性列出组合框中表项的数量;List属性保存了组合框中所有值的数组;Addltem方法用来在列表框中插入一行文本。
转载请注明原文地址:https://kaotiyun.com/show/l5hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimm(10)AsIntegerDimb(3)AsInteger
关于结构化程序设计原则和方法的描述错误的是
在窗体上画一个命令按钮,然后编写如下代码:PrivateTypeRecordIDAsIntegerNameAsString*20EndType
当窗体最小化时缩小为一个图标,设置这个图标的属性是
下列程序实现的功能是:当在窗体上单击时,把C盘根目录下的文件a1.txt复制到D盘,并取名为a2,txt。PrivateSubForm_Click()DimChAsStringOpen"c:\a1.txt"
在一棵二叉树中,度为0的结点的个数为n0,度为2的结点的个数为n2,则有n0=【】。
以下叙述中,错误的是______。
在VisualBasic中,用于文件复制的命令是【】。
设A="12345678",则表达式Val(Len(A,4)+Mid(A,4,2))的值为______。
由一棵二叉树的前序遍历序列和【】可唯一确定这棵二叉树。
随机试题
公司调研的流程有()。Ⅰ.制定调研计划Ⅱ.实地调研Ⅲ.编写调研报告Ⅳ.将调研报告在第一时间发送给所在公司的证券投资部门
A.急性胰腺炎B.乳腺癌C.胆囊炎D.原发性肝癌E.下肢静脉曲张慢性肝炎可导致
属于胶片感光特性的参数是
经血非时暴下不止或淋漓不净,称之为()
对肝性脑病病人,错误的护理措施是
美国心理学家斯蒂文斯(S.S.Stevens)用数量估计法研究了刺激强度与感觉大小的关系,关亍其研究结果表述正确的是
公民可以适用正当防卫民事权利是( )。
Readthearticlebelowabouttherealintentionsofcustomersandthequestionsontheoppositepage.Foreachquestion(13-1
SpeakerA:Couldyougivemearidetotheconferencecenter?Mypresentationisinabouthalfanhour.SpeakerB:______Haveyo
ThesearchforacheapalternativefuelhasledAmericanscientiststostudythepotentialof______.
最新回复
(
0
)