module2.bas

南海舰队进销存管理系统 vb

Attribute VB_Name = "Module2"
Option Explicit
Public kai1 As Integer
Public lin1 As Integer
Public guo1 As Integer
Public cha1 As Integer
Public bas1 As Integer
Public xulang4 As Integer    '确认管理员
Public user1 As String      '保存登录人姓名
Public user2 As String      '保存登录人密码