HandCurLoad

应用示例

'!TITLE "取得电动真空发生器当前负荷率"
' 取得电动真空发生器当前负荷率
Sub Sample_HandCurLoad

  Dim aaa As Double

  ' 取得当前的电动真空发生器的负荷率
  aaa = HandCurLoad

  '在消息输出窗口显示负荷率
  PrintDbg aaa

End Sub