首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输入数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输入的字符。单击名称为Commandl、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combol的组合
考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输入数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输入的字符。单击名称为Commandl、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combol的组合
admin
2020-04-08
29
问题
考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输入数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输入的字符。单击名称为Commandl、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combol的组合框中。在给出的窗体文件中已经添加了全部控件,但程序不完整。要求去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序中的其他部分和其他控件的属性。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“′”,将问号改为正确的内容。 参考答案(阴影部分是需考生填入的内容) Private Sub Commandlclick() Combol.
AddItem Text.Text
′将Textl中的内容加入Combol中 Textl.Text=""’同时将Textl内容清除 End Sub Private Sub Textl_KeyPress(KeyAscii As Integer) If KeyAscii>57 Or KeyAscii<
48
Then′数字的Ascii码值下界 MsgBox"请输入数字!" KeyAscii=
0
′清空 End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
单击命令按钮,运用组合框的List属性将文本框中的数字添加到组合框中,通过ASCII码来判断输入的是否为数字字符。
转载请注明原文地址:https://kaotiyun.com/show/NNTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:PrivateSubCommand1_Click()DimM(10)AsIntegerFork=1To10M(k)=12一kNe
窗体上有一个名称为VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScroll1.Value的值等于( )。
设有如下事件过程:PrivateSubForm_Click()x=0Whilex10x=x+1x=x*xWendPrintxEndSub运行程
设窗体上有2个框架,每个框架中有若干个单选按钮,下面叙述中正确的是()。
关于MDI窗体下列说法正确的是()。
数据字典(DD)所定义的对象都包含于
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
某系统总体结构图如下图所示:该系统总体结构图的深度是( )。
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是()。
设有如下Commandl的单击事件过程及fun过程:PrivateSubCommandl_Click()DimXAsIntegerX=Val(InputBox(“请输入一个整数”))
随机试题
WhenMaryMoorebeganherhighschoolin1951,hermothertoldher,“Besureandtakeatypingcoursesowhenthisshowbusinessth
Foreignersexperiencedifferentdegreesofcultureshock.Thesymptoms【B1】______fromgreattosmall.Somepeopleareonlyillat
CT成像,与X线转换有关的器件是
提高早期胃癌诊断率的三项关键性手段是
不存在神经节的传出神经是
饮酒对药品疗效的影响A、茶碱B、氟尿嘧啶C、降压药利血平D、抗癫痫药苯妥英钠E、布洛芬等解热镇痛药干扰胆碱的合成而增加肝毒性、神经毒性
患者,男性,32岁,因甲亢接受放射性131I治疗。治疗后护士应嘱患者定期复查,以便及早发现
在实施抽盘程序时发现的错误很可能意味着被审计单位的存货盘点还存在着其他错误,注册会计师的下列做法中不正确的是()。
马斯洛认为,自我实现的境界是()。
【B1】【B13】
最新回复
(
0
)