求助贴：求助大神，barcode 的开关定时器指令为 16 进制的，VB 里怎样编写通信？

我这样写开关定时器出错了：
'开定时器
Public Function Command_LON() As Integer
    Dim sErrorMessage As String
    Dim msgData As String
    Dim rc As Integer
    Dim bRc As Boolean
   
    rc = 0
    msgData = ""
    sErrorMessage = ""
    Dim sdat As String

    sdat = ChrW(27) &  “16 54 0D"                ' LON Command Data Send
        bRc = gclsLCR.SendMessage(sdat)
    If bRc = False Then
        GoTo Func_Err
    End If
    Debug.Print (sdat)

Func_Err:
    Command_LON = rc
End Function

'关定时器
Public Function Command_LOFF() As Integer
    Dim rc As Integer
    rc = 0
    Dim sdat As String
    Dim bRc As Boolean

    sdat = ChrW(27) & " 16 55 0D"                   ' LOFF Command Data Send
        bRc = gclsLCR.SendMessage(sdat)
    If bRc = False Then
        GoTo Func_Err
    End If
Func_Err:
Debug.Print (sdat)
    Command_LOFF = rc
End Function

谢谢版主了！我曾也有想过用数组的。我调试下，不行就转化为字符串。