public var.vb

用VB开发了一个超市管理系统

Module Public_Var
    Public CONN As String
    Public USER As tbuser
    Public Frmobj As New Form3()
    Sub main()
        CONN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Application.StartupPath + "\shujuku.mdb"
        Application.Run(Form1)
    End Sub
End Module