Управление модулем Ke-USB24A из Excel. Энциклопедия радиоэлектроники и электротехники

Энциклопедия радиоэлектроники и электротехники / Компьютеры

 Комментарии к статье

Первая часть

Всю прелесть программирования USB модуля Ke-USB24A можно оценить когда встает вопрос о необходимости написания программы на каком-либо не очень широко распространенном языке или для какой-либо среды, которая, казалось бы не предусматривает возможность работы с USB устройствами. Как тут быть? - разбираться с подключением библиотек, вызовами системных функци и т.д.? Все это зачастую бывает сложно. Модуль Ke-USB24A совсем другое дело! Благодаря тому что программный интерфейс реализован в виде последовательного порта, можно программировать модуль практически на любом языке. Продемонстрируем это на примере. В этой статье мы рассмотрим как можно управлять выводами модуля из программы Excel! Да-да, именно из нее, где Вы обычно составляете таблицы и строите графики.

Для того чтобы Excel могла общаться с COM портом нам потребуется установить в системе специальный компонент от Microsoft - ActiveX элемент MSComm. Для этого скачайте файлы к этой статье. Там находиться папка ActiveX.

Для инсталляции компонента достаточно выполнить файл Instal.bat - он сам выполнит всю необходимую работу по установке и регестрации компонента в системе. В процессе его выполнения Вам будет задан вопрос такого вида:

Нажимайте "Да". Появится сообщение об успешной установке. Нажимаем "Ok".

Все компонент установлен, можно браться непосредственно за Excel. Запускаем программу. Нам необходимо следующим шагом разрешить выполнение макросов Excel, т.к. по умолчанию они скорее всего выключены. Для этого заходите в меню Сервис -> Макрос -> Безопасность...

Установите вариант низкой безопастности - ведь мы то уверены в том наша собственная программа безопасна.

Теперь определимся что мы собственно хотим получить от Excel: Пусть на листе будут размещены элементы управления, которые позволят нам открывать доступ к устройству и записывать на указанную нами линию ввода/вывода низкий или высокий уровень напряжения.

Займемся расстановкой элементов управления. Для этого вызовите соответствующее окно, например, щелкнув правой кнпкой мыши по главному меню программы и выбрав в появившемся спискеЭлементы управления".

Перетаскиваем необходимые элементы управления на лист: три надписи, три окошка ввода и две кнопки. Изменить текст элементов можно нажав правую кнопку мыши в редакторе свойств элемента. В результате должно получиться например вот так:

Теперь пора взяться собственно за программирование. Программа Excel, как в прочем и другие офисные программы от Microsoft (например, Word, Acsess и т.д.) имеют встроенную поддержку языка программирования VBA (Visual Basic For Application). Он представляет из себя несколько расширенный Visual Basic. Чтобы перейти в редактор программы дважды щелкните по кнопкеОткрыть порт", ведь именно с нее начнется процесс выполнения программы.

Мы попадаем в редактор VBA, где перед нами появляется пустая заготовка кода для обработки события нажатия кнопки.

Прежде чем мы начнем непосредственно писать программу нам еобходимо подключить компонент MSComm (тот самый который мы чуть выше только что устанавливали в системе). Для этого в редакторе VBA в меню выбираем Tools -> References....

Нажимаем кнопку Browse.... В появившемся окне выбора файлов отыскиваем наш компонент MSCOMM32.OCX - он должен находится в директории C:\Windows\system32\. Нажимаем Открыть, затем кнопку Ok.

Пишем следующий код. Что он делает? Содаем экземпляр компонента для работы с портом, настраиваем его параметры и в конце открываем порт.

'Создаем экземпляр компонента для работы с портом
Dim KeUSB As New MSCommPrivate Sub CommandButton1_Click()
'Настраиваем порт
KeUSB.CommPort = Val(TextBox1.Value)
KeUSB.Settings =9600,N,8,1"
KeUSB.Handshaking = comNone
KeUSB.InputLen = 0
KeUSB.InBufferSize = 40
KeUSB.OutBufferSize = 40
KeUSB.RThreshold = 0
'Открываем порт
KeUSB.PortOpen = True
End Sub
 

Далее возвращаемся на лист Excel. Дважды щелкаем на кнопку Записать. Добавляем следующий код:

Private Sub CommandButton2_Click()
'Формируем команду $KE,WR
KeUSB.Output =$KE,WR," & TextBox2.Value &," & TextBox3.Value & Chr(13) & Chr(10)
End Sub

Все, с программированием закончили. Можно закрывать редактор VBA (незабываем сохранить перед выходом). Теперь нам необходимо на листе Excel перейти из режима редактора элементов управления в режим выполнения. Для этого на конеЭлементы управления" необходимо нажать соответсвующую кнопку в виде линейки-треугольника, чтобы она стала неактивной (не подствеченной).

Теперь можно собрать схему - я тут ни чего не меняю, использую как и в прошлой статье: ко всем линиям ввода/вывода модуля Ke-USB24A подключены светодиоды. Все линии настроены на выход. Вот собственно и вся схемотехника.

Итак, указываем номер COM порта модуля, нажимаем кнопку Открыть порт. Затем, указываем номер нужной линии и значение для записи (0 или 1). Нажимаем кнопку Записать - моргаем светодиодами.

А вот и фотография конструкции. Схема набрана на макетной плате - очень удобно, паять ни чего не нужно. Здесь установлены не все 24 светодиода а меньше.

Итак, указываем номер COM порта модуля, нажимаем кнопку Открыть порт. Затем, указываем номер нужной линии и значение для записи (0 или 1). Нажимаем кнопку Записать - моргаем светодиодами.

Программу конечно необходимо модернизировать - мы здесь ни как не анализируем ни ошибок выполнения, ни сами введенные данные. Однако не смотря на простоту данный пример показывает что с модулем Ke-USB24A можно работать практически из любой среды, в которой есть поддержка ActiveX компонент и хоть какой-либо язык программирования (даже скриптовый). Например, работу с модулем можно интегрировать в программу Microsoft Acsess и вести базу данных, можно интегрировать данную концепцию в программу 1С, например, и проводить какие-либо действия по внешним событиям с датчиков (ключей) и т.д. - возможности неисчерпаемы. А можно продолжать развивать тему с Excel - например, использовать ее для автоматического построения графиков по данным получаемым с АЦП модуля.

Автор: Дмитрий Иванов (Grirog); Публикация: cxem.net

Смотрите другие статьи раздела Компьютеры.

Читайте и пишите полезные комментарии к этой статье.

<< Назад

Последние новости науки и техники, новинки электроники:

Искусственная кожа для эмуляции прикосновений 15.04.2024

В мире современных технологий, где удаленность становится все более обыденной, сохранение связи и чувства близости играют важную роль. Недавние разработки немецких ученых из Саарского университета в области искусственной кожи представляют новую эру в виртуальных взаимодействиях. Немецкие исследователи из Саарского университета разработали ультратонкие пленки, которые могут передавать ощущение прикосновения на расстоянии. Эта передовая технология предоставляет новые возможности для виртуального общения, особенно для тех, кто оказался вдали от своих близких. Ультратонкие пленки, разработанные исследователями, толщиной всего 50 микрометров, могут быть интегрированы в текстильные изделия и носиться как вторая кожа. Эти пленки действуют как датчики, распознающие тактильные сигналы от мамы или папы, и как исполнительные механизмы, передающие эти движения ребенку. Прикосновения родителей к ткани активируют датчики, которые реагируют на давление и деформируют ультратонкую пленку. Эта ...>>

Кошачий унитаз Petgugu Global 15.04.2024

Забота о домашних животных часто может быть вызовом, особенно когда речь заходит о поддержании чистоты в доме. Представлено новое интересное решение стартапа Petgugu Global, которое облегчит жизнь владельцам кошек и поможет им держать свой дом в идеальной чистоте и порядке. Стартап Petgugu Global представил уникальный кошачий унитаз, способный автоматически смывать фекалии, обеспечивая чистоту и свежесть в вашем доме. Это инновационное устройство оснащено различными умными датчиками, которые следят за активностью вашего питомца в туалете и активируются для автоматической очистки после его использования. Устройство подключается к канализационной системе и обеспечивает эффективное удаление отходов без необходимости вмешательства со стороны владельца. Кроме того, унитаз имеет большой объем смываемого хранилища, что делает его идеальным для домашних, где живут несколько кошек. Кошачий унитаз Petgugu разработан для использования с водорастворимыми наполнителями и предлагает ряд доп ...>>

Привлекательность заботливых мужчин 14.04.2024

Стереотип о том, что женщины предпочитают "плохих парней", долгое время был широко распространен. Однако, недавние исследования, проведенные британскими учеными из Университета Монаша, предлагают новый взгляд на этот вопрос. Они рассмотрели, как женщины реагируют на эмоциональную ответственность и готовность помогать другим у мужчин. Результаты исследования могут изменить наше представление о том, что делает мужчин привлекательными в глазах женщин. Исследование, проведенное учеными из Университета Монаша, приводит к новым выводам о привлекательности мужчин для женщин. В рамках эксперимента женщинам показывали фотографии мужчин с краткими историями о их поведении в различных ситуациях, включая их реакцию на столкновение с бездомным человеком. Некоторые из мужчин игнорировали бездомного, в то время как другие оказывали ему помощь, например, покупая еду. Исследование показало, что мужчины, проявляющие сочувствие и доброту, оказались более привлекательными для женщин по сравнению с т ...>>

Случайная новость из Архива Молекулярная память работает при комнатной температуре 05.02.2013 Молекулярная память хранит данные в отдельных молекулах, которые находятся между двумя ферромагнитными электродами. У данной технологии большой потенциал, поскольку она позволяет хранить огромное количество информации на крохотном носителе. Однако до сих пор молекулярную память было очень сложно изготовить, и работала она только при охлаждении почти до абсолютного нуля. Группе ученых из Массачусетского технологического института и Индийского научно-образовательного института Калькутты удалось разработать новый тип молекулярной памяти, который не только проще в изготовлении, но и работает при температуре замерзания воды, что физики считают комнатной температурой. Например, для мощной серверной станции создать такую температуру можно с помощью холодильника, что гораздо проще, чем "городить" криогенные системы охлаждения. Кроме того, новая схема потребует лишь одного ферромагнитного электрода, что значительно упрощает производство. Новая память состоит из плоских листов углеродных атомов, присоединенных к атомам цинка. Эту структуру можно изготавливать с очень высокой точностью, что повышает надежность работы молекулярной памяти. Два ферромагнитных электрода - это стандартная структура для магнитной памяти, в которой резкое изменение ориентации магнитного поля электродов вызывает резкий скачок проводимости устройства. Эти два состояния проводимости и являются "1" и "0" запоминающего устройства. Новое исследование, к удивлению ученых, обнаружило в этой конструкции не один, а два скачка проводимости. Данное открытие позволяет производить молекулярную память с одним электродом, что существенно упрощает технологию молекулярной памяти и повышает ее надежность. Дело в том, что при наличии двух электродов молекулы верхнего электрода начинают смешиваться с молекулами, хранящими информацию. Кроме того, до сих пор проблемой молекулярной памяти была необходимость тщательного выравнивания молекул для хранения информации. Из-за этого эксперименты обычно ограничивались работой с 5-6 молекулами, а о коммерческом производстве нового типа памяти не было и речи. Новая молекулярная память состоит из атомов цинка, прикрепленных к плоским листам углерода. Эти материалы имеют свойство самовыравнивания - а значит, из них проще производить молекулярную память с заданными свойствами. Пока проводимость новой молекулярной памяти изменяется только на 20%, что слишком мало для широкого коммерческого применения новой технологии. Однако ученые считают, что смогут подобрать подходящее органическое соединение с большим колебанием проводимости.

Другие интересные новости:

▪ Гибридный квадроцикл Krampus

▪ Флэш-накопители Strontium On-The-Go USB для мобильных устройств

▪ Разные породы деревьев по-разному влияют на климат

▪ Жизнь по минимуму

▪ Извержения вулканов предскажет инфразвук

Лента новостей науки и техники, новинок электроники

Интересные материалы Бесплатной технической библиотеки:

▪ раздел сайта Биографии великих ученых. Подборка статей

▪ статья Зоил. Крылатое выражение

▪ статья Сколько лет было самой молодой маме в мире? Подробный ответ

▪ статья Работник по нарезке хлеба. Типовая инструкция по охране труда

▪ статья Магнитная вода. Энциклопедия радиоэлектроники и электротехники

▪ статья Огонь-художник. Секрет фокуса

Оставьте свой комментарий к этой статье:

All languages of this page

Arabic	Hebrew	Polish
Bengali	Hindi	Portuguese
Chinese	Italian	Spanish
English	Japanese	Turkish
French	Korean	Ukrainian
German	Malay	Vietnamese

Главная страница | Библиотека | Статьи | Карта сайта | Отзывы о сайте

www.diagram.com.ua
2000-2024