首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Combol的组合框,画两个名称分别为Label1和Label2及Caption,属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加
在窗体上画一个名称为Combol的组合框,画两个名称分别为Label1和Label2及Caption,属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加
admin
2013-01-23
41
问题
在窗体上画一个名称为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://jikaoti.com/ti/3cO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体文件的扩展名是
下面语句中错误的是
使用白盒测试方法时,确定测试数据应根据和指定的覆盖标准。
在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:PrivateSubCommand1_Click()DimjAsInteger,sAsIntegers=1Dos=s+j
运行下列程序:PrivateSubFormClick()Sum=0Fori=1To100IfMid(CStr(i),1,1)="1"ThenSum=Sum+1
下列()不是容器控件。
关系数据库管理系统能实现的专门关系运算包括选择、连接和【】。
由一棵二叉树的前序遍历序列和【】可唯一确定这棵二叉树。
以下关系表达式中,其值为假的是:______。
(1)在考生目录下有一个工程文件sjt3.vbp,窗体文件中已给出所有控件和部分程序,如图1-118所示。要求:①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐;②请编写适当的程序完成以下功能:在Textl中输入40(度数),选择一个
随机试题
急性肾衰竭严重代谢性酸中毒最有效的治疗方法是
具有抗原呈递功能的细胞为( )
使用苦楝皮时应注意()使用槟榔时应注意()
消化系统中药中毒反应的表现有()。
(2001年考试真题)甲工业企业为增值税一般纳税企业,采用实际成本进行材料日常核算。假定运费不考虑增值税。2000年8月1日有关账户的期初余额如下:在途物资4000(元)预付账款——D企业8000(元)委托加工物资——B企业2000(元)包装物5000(元
生活垃圾分类回收加工后再利用的做法所体现的唯物辩证法观点是()。
广告的表现方式分为哪几类?()
李克强总理自上任以来,多次强调要整治“懒政”;“尸位素餐本身就是腐败,不作为的‘懒政’也是腐败。”“对于忽视民生、为官不为的‘庸政’‘懒政’,要‘动刀子’、‘出重拳’、公开曝光,坚决追责!”这说明()。
一个民族的追求与向往、历史与传承往往通过节日____________出来。传统节日期间的各种带有仪式性的活动甚至饮食,都能____________人们强烈的情感波澜,使人们深深感觉到自己是这个民族的一分子。因此,传统节日____________了民族身份认
"Everythinghappensforthebest",mymothersaid(31)Ifaceddisappointment."Ifyoucarryon,onedaysomethinggoodwill(32
最新回复
(
0
)