Attribute VB_Name = "shareVariable"
Public myComputerName As String     '當前電腦的名字

Public userName As String           '用戶名
Public userPw As String             '用戶密碼
Public userPower As String          '用戶權限

Public SName As String              '數據庫服務器名
Public SUName As String             '數據庫用戶登陸名
Public SUPw As String               '數據庫用戶登陸密碼

Public landWay As Integer           '用戶登陸方式

Public percentage0 As Double        '活期利率
Public percentage1 As Double        '一年
Public percentage2 As Double        '二年
Public percentage3 As Double        '三至五年
Public percentage5 As Double        '五至八年
Public percentage8 As Double        '八年以上