首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读下列程序说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 [说明] 本程序提供了查询景点票价信息的功能,查询包括两种方式:按景点名称查询以及白定义查询。程序界面如下图所示: 其中,选择景点名称的组合框(Comobox)
阅读下列程序说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 [说明] 本程序提供了查询景点票价信息的功能,查询包括两种方式:按景点名称查询以及白定义查询。程序界面如下图所示: 其中,选择景点名称的组合框(Comobox)
admin
2009-02-15
73
问题
阅读下列程序说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。
[说明]
本程序提供了查询景点票价信息的功能,查询包括两种方式:按景点名称查询以及白定义查询。程序界面如下图所示:
其中,选择景点名称的组合框(Comobox)名为Combo1,单旋钮“旺季”和“淡季”分别名为Op- tion1和Option2,用于输入票价上限的文本框名为Texi1,两种查询方式的“提交”按钮分别名为 Command1和Command2。已知Combol列表中第i个景点的旺季票价和淡季票价分别存放于数组元素P(i,0)和p(i,1)中。
[Visual Basic代码]
Dim p(20, 2) As Single ’通用声明
Private Sub Form_Load( )
For i = 0 To 9 ’对p赋值
p(i, 0)=........ :p(i, 1)=.......
Next
End Sub
Private Sub Commandl_Click( ) ’查询方式一:按景点名称查询
Dim cboTcxt As String
eboText =(1)
Fori = 0 To (2) -1 ’对Combo1中各列表项循环
If (3)= cboText Then
MsgBox "景点名称" & cboText & "旺季票价" & p(i, 0) & _
",淡季票价" & p(i, 1)
Exit Sub
End If
Next i
End Sub
Private Sub Command2_Click( ) 查询方式二:自定义查询
Dim price As Single, result As String, flag As Boolean
price =Val( (4) )
flag = False
result = ""
For i = 0 To (2) - 1’对Combo1中列表项循环,找出符合条件的景点
If(Optionl. Value And p(i, 0) < = price) Or((5)) Then
(6)
result=result & "景点名称" &(3)& ",旺季票价:"&_
p(i, 0) & ",淡季票价:" & p(i, 1) & vbCrLf
End If
Next i
If flag Then
MagBox result
Else: Msgaox "没有找到符合条件的景点信息!"
End If
End Sub
选项
答案
(1)Combo1.Text (2)Comb01.ListCount (3) Comb01.List(i) (4)Textl.Text (5)Option2.ValueAndP(i,1)<= Price (6)flag=True
解析
(1)~(3)ComboBox控件常用属性及用法如下:Combo1.Text表示组合框Combo1当前的文本内容; Comb01.1JstCount表示组合框Combo1中列表项总个数;Comber. List(i)表示组合框Combo1中列表项i(编号从0开始)的内容;
(4)Text控件的常用眉性是Text,表示文本框中的内容;
(5)使用自定义查询时,当“旺季”单选钮被选中时,景点的旺季票价不超过Price,此时有Option1. Value And P(i,0)<=price,类似地,当“淡季”单选钮被选中时,查询条件应该是Option2.Value And p(i,1)<= price;
(6)flag标志用于标记是否有匹配查询条件的景点,初始时置为False,一旦发现存在匹配查询条件的景点,应该置为True。
转载请注明原文地址:https://kaotiyun.com/show/CojZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
在Excel中,与函数“=AVERAGE(A1:A3)”等价的是______。
人机交互界面有多种方式,不包括______。
下列选项中,具有连接范围窄、用户数少、配置容易、连接速率高等特点的网络是(8)。
在调查某地区各类用户所喜欢的电视栏目时,信息处理技术员小王制作了用户类(U)与电视栏目(V)关系图。下面的示意图描述了五类用户(从上到下U1~U5)与四个电视栏目(从上到下V1~V4)之间的关系:如果某类用户大多喜欢某个电视栏目,则在它们之间画一条连线。从
假设“EXAM.DOC”文件夹存储在“EXAM1”文件夹中,“EXAM1”文件夹存储在“EXAM2”文件夹中,“EXAM2”文件夹存储在F盘的根文件夹中,当前文件夹为“EXAM1”。那么,正确描述“EXAM.DOC”文件的绝对路径表示为(37)。
计算机硬件唯一能够直接识别和处理的语言是(30)________________。
n=1,2,3,…,100时,[n/3]共有(4)________________个不同的数([a]表示a的整数部分,例如[3.14]=3)。
在Excel的A1单元格中输入函数“=ROUND(3.1415,2)”,则A1单元格中显示的值为(57)。
在Excel2007中,在单元格A1中输入函数“=POWER(2,3)/MAX(1,2,4)”,按回车键后,则A1单元格中的值为__________。
随机试题
下列不属于社区健康档案的重点建档对象的是【】
简述社会主义核心价值观的显著特征。
阳明经头痛的部位在
类风湿关节炎的基本病理改变是
关于我国商品期货交易所对持仓限额的规定,表述正确的是()。
某公司2012年年末负债对所有者权益的比率为110%。若该公司计划2012年年末所有者权益为4000万元,则该公司2012年年末资产负债率为()。
根据《证券法》的规定,股份有限公司申请证券上市交易,应当向特定机构申请,由该机构依法审核同意,并由双方签订上市协议后方可上市,该特定机构是()。
某单位要求职工参加20课时线上教育课程,其中政治理论10课时,专业技能10课时。可供选择的政治理论课共8门,每门2课时;可供选择的专业技能课共10门,其中2课时的有5门,l课时的有5门。问可选择的课程组合共有多少种?()
Ifsabravemanwhoclaims"geniusinsciencehasbecomeextinct".Butthat’sexactlywhatpsychologistDeanKeithSimontondecl
Whatisthesourceofthisextremeself-confidencefoundinalmostalloptimists(乐观主义者),thisbeliefthattheycanaccomplishgr
最新回复
(
0
)