module1.bas

针对于订房中心的酒店合同管理。管理权限有管理员和业务员等。

Attribute VB_Name = "Module1"
Option Explicit
Public strShenFen As String  '记录登录时的用户身份，以便查看权限
Public username As String  '记录登录时的用户名，以便修改密码
Public Const TryoutLimit = 30
'注册码
Public Const RegSN = "yh_2006"