Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Как получ...

Тема: Как получить значение первого и последнего байта

15.06.2007 21:08:03

Alex15

11 сообщения

Тема: Как получить значение первого и последнего байта

Как можно обработать двухбайтовую переменную? Она представлена как строка из двух символов, необходимо поменять местами первый и второй байт. Далее полученное значение необходимо будет обрабатывать как числовое значение

P.S. Общие вопросы по модулям
Автор: Саня от 10.02.2004 18:05:24 Источник ...

15.06.2007 21:08:03

All

4316 сообщения

RE: Как получить значение первого и последнего байта

1. Такие функции лучше писать на С++. Этот язык позволяет работать с указателями на переменные. 2. Хотя можно попробовать и на VBA написать функцию. Например, путем конвертации в текстовые переменные:
Dim s As String, a As Long
s = Hex(459)
' ...
a = CLng("&H" & s)

P.S. Общие вопросы по модулям
Автор: Admin от 0:00:00 Источник ...

15.06.2007 21:08:03

All

4316 сообщения

RE: Как получить значение первого и последнего байта

А это полное решение.
Public Function funConvertNumber(num As Long) As Long
Dim s As String
s = Hex(num)
s = String(4 - Len(s), "0") & s
s = "&H" & Right(s, 2) & Left(s, 2)
funConvertNumber = CLng(s)
End Function

P.S. Общие вопросы по модулям
Автор: Admin от 0:00:00 Источник ...

15.06.2007 21:08:03

All

4316 сообщения

RE: Как получить значение первого и последнего байта