毕业论文论文范文课程设计实践报告法律论文英语论文教学论文医学论文农学论文艺术论文行政论文管理论文计算机安全
您现在的位置: 毕业论文 >> 课程设计 >> 正文

宾馆客房管理系统ER图.数据流图.功能模块图.流程图 第5页

更新时间:2008-12-10:  来源:毕业论文

宾馆客房管理系统ER图.数据流图.功能模块图.流程图 第5页
6.2系统主程序窗口界面
Private Sub Form_Load()
 Data1.DatabaseName = App.Path & "\Kfgl.MDB"     '自动识别数据库路径
End Sub
Private Sub Form_Activate()     '设置操作员权限
 With Data1.Recordset
 If .BOF = False Then .MoveFirst
 .FindFirst "操作员 like " + Chr(34) + StatusBar1.Panels(4).Text + Chr(34) + ""
 If .NoMatch Then
 Else
  main.zjyj.Enabled = .Fields("追加押金")
  main.zsdj.Enabled = .Fields("住宿登记")
  main.Label1.Enabled = .Fields("住宿登记")
  main.tf.Enabled = .Fields("退宿登记")
  main.Label2.Enabled = .Fields("退宿登记")
  main.tfdj.Enabled = .Fields("调房登记")
  main.kfsz.Enabled = .Fields("客房管理")
  main.kfcx.Enabled = .Fields("客房查询")
  main.ftck.Enabled = .Fields("房态查看")
  main.khjk.Enabled = .Fields("客户结款")
  main.zscx.Enabled = .Fields("住宿查询")
  main.Label3.Enabled = .Fields("住宿查询")
  main.tfcx.Enabled = .Fields("退宿查询")
  main.sftx.Enabled = .Fields("宿费提醒")
  main.Label5.Enabled = .Fields("宿费提醒")
  main.Label4.Enabled = .Fields("客房销售报表")
  main.xstj.Enabled = .Fields("客房销售统计报表")
  main.czysz.Enabled = .Fields("操作员设置")
  main.ma.Enabled = .Fields("密码设置")
  main.csh.Enabled = .Fields("初始化")
  main.qxsz.Enabled = .Fields("权限设置")
 End If
 End With
End Sub

Private Sub label1_Click()     '调入住宿登记
 zsdj_Click
End Sub
Private Sub label2_Click()      '调入退宿结帐
 tf_Click
End Sub
Private Sub Label3_Click()      '调入住宿查询
 zscx_Click
End Sub
Private Sub Label4_Click()      '调入客房销售报表
 xsbb_Click
End Sub
Private Sub Label5_Click()      '调入宿费提醒
 sftx_Click
End Sub
Private Sub label6_Click()
 End
End Sub


Private Sub zjyj_Click()       '调入追加押金
 Load main_zjyj
 main_zjyj.Show
 main.Enabled = False
End Sub
Private Sub tfdj_Click()      '调入调房登记
 main_tfdj.Show
 main.Enabled = False
End Sub
Private Sub tf_Click()        '调入退宿结帐
 main_tf.Show
 main.Enabled = False
End Sub
Private Sub kfsz_Click()      '调入客房管理
 main_kfgl.Show
 main.Enabled = False
End Sub
Private Sub kfcx_Click()      '调入客房查询
 main_kfcx.Show
 main.Enabled = False
End Sub
Private Sub ftck_Click()      '调入房态查看
 main_ftcx.Show
 main.Enabled = False
End Sub
Private Sub gzcx_Click()      '调入挂帐查询
 Load main_gzcx
 main_gzcx.Show
 main.Enabled = False
End Sub
Private Sub khjk_Click()      '调入客户结款
 Load main_khjk
 main_khjk.Show
 main.Enabled = False
End Sub

Private Sub zscx_Click()       '调入住宿查询
 Load main_zscx
 main_zscx.Show
 main.Enabled = False
End Sub
Private Sub tfcx_Click()       '调入退宿查询
 Load main_tfcx
 main_tfcx.Show
 main.Enabled = False
End Sub
751com.cn
Private Sub xsbb_Click()       '调入客房销售报表
 main_xsbb.Show
 main.Enabled = False
End Sub
Private Sub xstj_Click()       '调入客房销售统计
 main_xstj.Show
 main.Enabled = False
End Sub
Private Sub czysz_Click()      '调入操作员设置
 Load main_czysz
 main_czysz.Show
 main.Enabled = False
End Sub
Private Sub ma_Click()          '调入密码设置
 main_mmsz.Show
 main.Enabled = False
End Sub
Private Sub csh_Click()         '调入初始化
 main_csh.Show
 main.Enabled = False
End Sub
Private Sub qxsz_Click()        '调入权限设置
 main_qxsz.Show
 main.Enabled = False
End Sub
Private Sub tc_Click()
 End
End Sub
6.3住宿管理设计
6.3.1住宿登记

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >> 

宾馆客房管理系统ER图.数据流图.功能模块图.流程图 第5页下载如图片无法显示或论文不完整,请联系qq752018766
设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©751com.cn 辣文论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。