rmsmain.bas

来自「AVAYA IPO 430系列交换机 TAPI 2.0软件电话源代码」· BAS 代码 · 共 29 行

Attribute VB_Name = "RMSMain"
Option Explicit

' * Program written by R.Sterling for Avaya *
' * No queries should be directed to this individuals in connection with this program.
'   All queries should be directed to Avaya Technical Support (FSG) *
' * Copyright Avaya 2002 *

Public Sub Main()

    glNoOfErrors = 0
    
    Load frmOptions
    DoEvents
    frmOptions.Hide
    Load frmNotes
    DoEvents
    frmNotes.Hide
    Load frmMDIMain
    frmMDIMain.WindowState = vbMaximized
    DoEvents
    Load frmStatus
    DoEvents
    Load frmMain
    DoEvents
    frmMain.ZOrder 0
    
End Sub