Option Explicit

Dim goMachineControl As New cMachineControl

Sub call_cMachineControl_Initialize()

  MsgBox _
    goMachineControl.Initialize( _
    )

End Sub

Sub call_cMachineControl_getComputerName()

  MsgBox _
    goMachineControl.getComputerName( _
    )

End Sub

Sub call_cMachineControl_getStatus()

  MsgBox _
    goMachineControl.getStatus( _
    )

End Sub

Sub call_cMachineControl_getEnv()

  MsgBox _
    goMachineControl.getEnv( _
        getSysParaBySheet(ActiveSheet.Name, "A03P1") _
    )

End Sub

Sub call_cMachineControl_getLoginUserName()

  MsgBox _
    goMachineControl.getLoginUserName( _
    )

End Sub

Sub call_cMachineControl_getOsName()

  MsgBox _
    goMachineControl.getOsName( _
    )

End Sub

Sub call_cMachineControl_Terminate()

  MsgBox _
    goMachineControl.Terminate( _
    )

End Sub