2013届毕业论文格式

智能铁路查询系统

图4-22 精品列车查询界面

两界面代码相同

“确定”按钮中clicked事件代码如下： dw_1.settransobject(sqlca)

dw_1.setfilter(\终点站='\dw_1.retrieve()

if dw_1.retrieve()<>1 then

messagebox(\查找失败!\找不到由洛阳至该地的精品列车，请在其他窗口中查找普通列车!\

end if

“浏览”按钮中clicked事件代码如下： dw_1.settransobject(sqlca) dw_1.setfilter(\ dw_1.retrieve()

4. 基于车次的查询

45

洛阳师范学院2013届本科生毕业设计

图4-23 基于车次查询界面

“确定”按钮中clicked事件代码如下：

/*????????????????????????????????????? 直接输入车次，点击确定，系统会自动列出该次列车的详细信息，包括始发站、始发时间、终点站、到站时间、车辆类型、行驶里程等；若要查看该车次途经的所有站点信息，只需单击界面左侧的“途经站点”按钮

?????????????????????????????????????*/

dw_1.settransobject(sqlca)

dw_1.setfilter(\车次='\dw_1.retrieve()

if dw_1.rowcount()=0 then

messagebox(\查找失败！\找不到所需信息!\end if

5. 基于站点的查询

“确定”按钮中clicked事件代码如下：

/*????????????????????????????????????? 用户输入车站名，即可查出到达本站的所有车次的基本信息。

?????????????????????????????????????*/

dw_1.settransobject(sqlca)

dw_1.setfilter(\站点表_站名='\dw_1.retrieve()

46