module1.bas

这是一个啤酒销售系统的软件

Attribute VB_Name = "Module1"
Public Const AD = 0 '此权限用于系统管理员
Public Const XSM = 1 '此权限用于库存管理人员
Public Const CGM = 2 '此权限用于销售管理人员
Public Const GGM = 3
Public Const QT = 4
Public qx As Integer
Public tabstring As String
Public tabstring1 As String
Public tabstring2 As String
Public tabstring3 As String
Public tabstring4 As String
Public tabstring5 As String
Public zhno As String
Public mima As String