module1.vb

这是个用VB编写的机票销售与查询管理系统

Module Module1
    Public ReadOnly Property constr() As Object
        Get
            constr = "database=ticket;user id=sa;password=;"
        End Get
    End Property
    Public mytemp As Integer = 0
    Public ct As Integer
    Public x1, x2, x3, x4, x5, x6 As String
    Public my_class As New class1
    Public username As String
End Module