beautypg.com

5 visual basic interface, Visual basic interface – Metrohm 846 Driver Toolbox User Manual

Page 47

background image

3.1 Programming interface definitions

Dosing Interface USB Toolbox, Annex

43

3.1.5 Visual Basic Interface

Attribute VB_Name = "Module1"

'*****************************************************************************

'* *

'* Metrohm AG Switzerland. All rights reserved. *

'* *

'*---------------------------------------------------------------------------*

'* *

'* 1 31.05.05 14:28 rw *

'* *

'*****************************************************************************

Option Explicit

Public Enum eReturnState

' function could be set up correctly

RET_STAT_OK

' not a valid 846 Dosing Interface number or Dosino number

RET_STAT_nvNumber

' not a valid Dosino

RET_STAT_noDosino

' communication error

RET_STAT_commError

' function arguments out of specified range

RET_STAT_argError

' not a valid action

RET_STAT_nvAction

End Enum

Public Enum eDosinoState

' Dosino is ready to execute a function

DOS_STAT_IDLE

' Cylinder is being filled

DOS_STAT_FILL

' Dosino is executing Exchange function

DOS_STAT_EXCHANGE

' Dosino is executing GoPos function

DOS_STAT_POSITION

' Dosino is executing ZeroAdjust function

DOS_STAT_ZEROADJUST

' Dosino is executing Adjust function

DOS_STAT_ADJUST

' Dosino is executing Cock function

DOS_STAT_COCK

' Dosino is executing ToEnd function

DOS_STAT_TOENDDOS

' Dosino is executing MakeStep function

DOS_STAT_DOS

' Dosino is executing Prep function

DOS_STAT_PREPAR

' Dosino is executing Empty function

DOS_STAT_EMPTY

' Dosino is busy

DOS_STAT_BUSY

' Dosino is halted while filling

DOS_STAT_HOLD_FILL

' Dosino is halted in Exchange function

DOS_STAT_HOLD_EXCHANGE

' Dosino is halted in GoPos function

DOS_STAT_HOLD_POSITION

' Dosino is halted in ZeroAdjust function