main.bas

来自「都是基于VB所做的程序集合,值得大家作为实践的参考资料.」· BAS 代码 · 共 20 行

Attribute VB_Name = "mMain"
Public objLT As soLongTransaction
Public objDatasource As soDataSource
Public objDataset As soDataset
Public strLoginUser As String
Public strLoginPassword As String
Public strServer As String
Public strDatabase As String
Public strUser As String
Public strPassword As String
Public objRecordset As soRecordset


Sub Main()
    Load frmLongTrans
    frmLongTrans.Show
    frmLongTrans.Visible = True
    frmLongTrans.ZOrder
End Sub