0
Как передать байтовый массив как функциональный параметр в VBA?Байт-массив в доступе VBA
В VB функция написания EPC HEX слово радиометки:
Public Shared Function WriteEPC_G2(ByRef ConAddr As Byte, **ByVal Password() As Byte**, **ByVal WriteEPC() As Byte**, ByVal WriteEPClen As Byte, ByRef errorcode As Integer, ByVal PortHandle As Ineger) As Integer
Bolded параметры выполнены с функцией, которая генерирует массив байтов из текстовых полей (пароль «00000000» и ECP писать «т.е. 1234»)
Private Function HexStringToByteArray(ByVal s As String) As Byte()
s = s.Replace(" ", "")
Dim buffer(s.Length/2 - 1) As Byte
Dim i As Integer
For i = 0 To s.Length - 2 Step 2
buffer(i/2) = Convert.ToByte(s.Substring(i, 2), 16)
Next
Return buffer
End Function