首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt4.vbp中有如图3-161所示的控件。程序功能如下:程序运行时,在Text1中输入一个商品名称,在Text2中输入一个数量,单击“计算”按钮,则会在列表框中找到该商品的单价,乘以数量后显示在Text3中(如图3-161所示);
考生文件夹下的工程文件sjt4.vbp中有如图3-161所示的控件。程序功能如下:程序运行时,在Text1中输入一个商品名称,在Text2中输入一个数量,单击“计算”按钮,则会在列表框中找到该商品的单价,乘以数量后显示在Text3中(如图3-161所示);
admin
2016-01-31
95
问题
考生文件夹下的工程文件sjt4.vbp中有如图3-161所示的控件。程序功能如下:程序运行时,在Text1中输入一个商品名称,在Text2中输入一个数量,单击“计算”按钮,则会在列表框中找到该商品的单价,乘以数量后显示在Text3中(如图3-161所示);若输入的商品名称是错误的,则在Text3中显示“无此商品”(为方便编程,列表框中的每个单价均为4位(含小数点))。请将事件过程中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
选项
答案
审题分析 本题程序运行时,在文本框中输入商品名称,当单击命令按钮的时候,首先判断该商品是否在列表框中存在。由于列表框中的每一项都是商品名称+空格+单价的组合,因此在循环判断列表框的每一项时,首先找到列表项里面空格的位置,然后取出空格之前的字符就是商品名称,和文本框中输入的数据进行对比,如果一致则说明有此商品,那么取出列表项的后4个字符即商品单价进行操作,并且在退出循环的同时令旗帜变量flag变为True。当循环结束后,如果flag变量的值为True则证明有此商品,将单价*数量的值显示在文本框中,否则在文本框中显示“无此商品”。 操作步骤 步骤1:打开考生文件夹下的工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: For k=1 To List1.ListCount-1 name=Left(List1.List(k),n-1) price=Val(Right(List1.List(k),4)) Text3="无此商品" 步骤2:按要求将文件保存至考生文件夹中。 考点链接 选择控件、常用内部函数。
解析
转载请注明原文地址:https://kaotiyun.com/show/luLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
按文件的访问方式不同,可以将文件分为()。
语句DimArr(-3To5)AsInteger定义的数组的元素个数是()。
下面程序运行后,输出的结果是Dimarr(3,3)Forj=1To3Fork=1To3Art(j,k)=(j-1)*3+kNextkNextjForj=2To3Fork=2To3Printarr(k,j);
设有如下的记录类型:TypeStudentNumberAsStringNameAsStringAgeAsIntegerEndSub则能正确引用该记录类型变量的代码是()。
为了在列表框中使用Ctrl和Shift键进行多个列表项的选择,应将列表框的MultiSelect属性设置为()。
在面向对象方法中,()描述的是具有相似属性与操作的一组对象。
长度为n的顺序存储线性表中,当在任何位置上插入一个元素概率都相等时,插入一个元素所需移动元素的平均个数为【】。
在设计阶段,当按Ctrl+R键时,所打开的窗口是
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAng KAsInteger
下列不属于软件工程3个要素的是()。
随机试题
下列关于痢疾志贺菌的特性描述正确的是()
女,38岁,因阴部有块状物脱出而就诊。妇科检查:阴道前壁脱出,超过处女膜缘,部分宫体与宫颈露于阴道口外,宫颈较长。其临床分度为
组织应制定一个或多个方案,其作用是保证环境( )的实现。
账户记录中如果出现漏记、重记、串记、反方向记录等时,有可能不影响发生额试算平衡。( )
在中国证监会对承销业务的现场检查中,包括检查作为主承销商是否对发行人信息披露文件的()进行了核查。
如果A、B两只股票的收益率变化方向和变化幅度完全相同,则由其组成的投资组合()。
马克思主义认为,实现人全面发展的根本途径是()
不等式4(χ-2)≤2(χ-1)的非负整数解的个数是().
在通过其他途径都不能获得满意的救济时,可以通过()渠道获得充分的补救。
"HowdidJamiefindoutaboutherpromotion?""She______byherboss."
最新回复
(
0
)