app.vb

来自「编程环境VB.NET2005 多线程下载」· VB 代码 · 共 23 行

Public Class App
    Private Shared m_MainForm As FrmMain
    Public Shared Property MainForm() As FrmMain
        Get
            Return m_MainForm
        End Get
        Set(ByVal value As FrmMain)
            m_MainForm = value
        End Set
    End Property
    'Public canExit As Boolean = False
    Private Shared m_speedLimit As Integer
    Public Shared Property MySpeedLimit() As Integer
        Get
            Return m_speedLimit
        End Get
        Set(ByVal value As Integer)
            m_speedLimit = value
        End Set
    End Property

End Class