Вопрос № 57814: Здравствуте эксперты.
Программирую COM-port на VB и неожиданно столкнулся с проблемой -
как отправить в COM-port массив фиксированной
размерности типа Byte?
Например:
Dim out_data(20) as Byte
Dim Arr() as Byte
'Иниц...
Вопрос № 57.814
Здравствуте эксперты.
Программирую COM-port на VB и неожиданно столкнулся с проблемой -
как отправить в COM-port массив фиксированной
размерности типа Byte?
Например:
Dim out_data(20) as Byte
Dim Arr() as Byte
'Инициализация out_data(20)
'Инициализация СОМ порта
......
MSComm1.SThreshold = 20 'Посылаемое количество байт
MSComm1.InputMode = comInputModeBinary
.......
'MSComm1.Output = ???? как?
При Компиляции или на стадии исполнения генерится ошибка.
В MSDN примера по отправке в COM-port данных типа Byte нет.
Есть масса примеров по отправке типа String.
И последний вопрос.
Как Dim Arr() as Byte инициализировать
значениями Dim out_data(20) as Byte и на оборот.
В специальном издании по Visual Basic нет ни слова (800 страниц!!!).
Заранее благодарен.
Отправлен: 05.10.2006, 16:12
Вопрос задал: Сергей Б. (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: white
Здравствуйте, Сергей Б.!
Преобразуй массив байт в строку:
Dim s as String
Dim i as Long
s = ""
For i = LBound(out_data) to UBound(out_data)
s = s & Chr$( out_data(i))
Next
и отправляй ее в порт.
Таким же образом и данные одного массива передавть в другой
Arr(i) = out_data(i)
Ответ отправил: white (статус: 3-ий класс)
Ответ отправлен: 07.10.2006, 12:33
