staticvalue.vb

本文件为进销存管理系统的代码 在VB的环境下运行 用比较简单的结构完成的

Module StaticValue
    Public pass As Boolean     '记录是否通过验证
    Public ID As String        '记录登陆用户ID
    Public AdminName As String '记录登陆用户名
    Public PassWord As String  '记录登陆用户密码
    Public ClickAdd As Boolean '监控点击的是添加还是修改
    Public ClickBuy As Boolean '监控点击的是采购还是销售
    Public ClickInput As Boolean '监控点击的是入库还是出库
    Public buy As Boolean       '监控点击的是经销商还是购货商
    Public Temp(12) As Object   '存储一组传递信息
    Public dtTemp As New DataTable '用来去DATAGRID中数据
    Public storename As String   '用来存储存储过程的名字
    Public hasID As Boolean     '用来记录是否有相同ID
    Public pay As Boolean       '用来记录是否付款
End Module