【说明】
甲乙两地之间的铁路线上有二十多个火车站,为方便乘客查询票价,特开发了火车票价格查询程序,其运行窗口如下图所示。乘客只要通过两个下拉列表框分别选择起点与终点站名,再单击“查询”按钮,则票价文本框就会显示相应的票价。

在开发过程中,设选择起点和终点站名的组合框(ComboBox)名分别为ST和SP,显示票价的文本框(TextBox)名为Price,“查询”按钮(CommandButton)名为Query;设ST与SP中的诸列表项完全相同,且都是从甲地开始依次排列,从第i站到第j站的票价存放在二维对称矩阵P的元素P(i,j)中,假设从甲地到第i站行驶的距离存放在d(i)中,火车票价等于其行驶距离乘以C(常数)。
【Visual Basic代码】
Dim p ( 30 , 30 ) As Single ‘通用声明
Const C=0.2
Private Sub Form_Load ()
Dim d ( 30 ) As Single
__(1)__ = “甲地” ‘在ST组合框中设置首个列表项
…… ‘在ST和SP中设置其他列表项(若干行语句)
…… ‘对数组d(i)赋值(若干行语句)
For i=0 to ST. ___(2)___ -1 ‘对ST中各列表项循环
For j=0 to SP. ___(2)___ -1 ‘对SP中各列表项循环(这两处填写内容相同)
P( i, j ) = ___(3)___
Next j
Next i
End Sub
Private Sub query_Click ()
i = ___(4)___ ‘组合框ST中选择的当前项编号
j = …… ‘组合框SP中选择的当前项编号(语句略)
___(5)___ = str $ ( p ( i , j ) )
End Sub
正确答案及解析
正确答案
解析
(1) st.List(0)
(2) ListCount
(3) abs(d(j)-d(k))*C
(4) st.ListIndex
(5) Price.Text
本题目涉及的控件有组合列表框(ComboBox)、文本框(TextBox)和命令按钮(CommandButton),主要考查组合列表框的常用属性。
你可能感兴趣的试题
一台主机的IP地址为202.123.25.36,掩码为255.255.254.0。如果该主机需要在该网络进行直接广播,那么它应该使用的目的地址为( )
-
- A.202.123.25.0
- B.202.123.25.255
- C.202.123.24.0
- D.202.123.24.255
- 查看答案
在计算机系统的日常维护工作中,应当注意硬盘工作时不能__(2)__。另外,需要防范病毒,而__(3)__是不会被病毒感觉的。
-
- A.电子邮件
- B.硬盘
- C.U盘
- D.ROM
- 查看答案
有 4 个 IP 地址:201.117.15.254、201.117.17.01、201.117.24.5 和 201.117.29.3,如果子网掩码为 255.255.248.0,则这 4 个地址分别属于3个子网;其中属于同一个子网的是()
-
- A.201.117.15.254 和 201.117.17.01
- B.201.117.17.01 和 201.117.24.5
- C.201.117.15.254 和 201.117.29.3
- D.201.117.24.5 和 201.117.29.3
- 查看答案
在异步通信中,每个字符包含1位起始位、7位数据位、1位奇偶位和1位终止位,每秒钟传送200个字符,采用4相位调制,则码元速率为()。
-
- A.50波特
- B.500波特
- C.550波特
- D.1000波特
- 查看答案
在 Windows 中,运行( )命令得到下图所示结果。以下关于该结果的叙述中,错误的是( )。
Pinging 59.74.111.8 with 32 bytes of data:
Reply from 59.74.111.8: bytes=32 time=3ms TTL=60
Reply from 59.74.111.8: bytes=32 time=5ms TTL=60
Reply from 59.74.111.8: bytes=32 time=3ms TTL=60
Reply from 59.74.111.8: bytes=32 time=5ms TTL=60
Ping statistics for 59.74.111.8:
Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
Minimum = 3ms, Maximum = 5ms, Average = 4ms
-
- A.该命令使得本地主机向目标主机发送了 4 个数据包
- B.本地主机成功收到了目标主机返回的 4 个数据包
- C.本地主机与目标主机连接正常
- D.该命令用于查看目标主机的 IP 地址
- 查看答案