Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Krik99 -

Visual Basic 5.0/6.0 - Железо и устройства

Все примеры / Железо и устройства

Программирование LPT порта

Автор: Krik99 | добавлено: 06.03.2010, 11:24 | просмотров: 4955 (1+) | комментариев: 0 | рейтинг: *x10
Программирование LPT порта. Простейший пример.

Код

Private Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Private Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

'запись в порт
Private Sub Command1_Click()
 Out &H378, Text1.Text
End Sub

'чтение из порта
Private Sub Command2_Click()
 MsgBox (Inp(&H378))
End Sub
Файлы testlpt.rar (15,35 Кб)
Обратите внимание
Язык Visual Basic 6.0 является устаревшим. Многие примеры, размещенные на нашем сайте, были созданы еще во времена Windows 98 и могут не работать в современных операционных системах.
Если у вас возникнут какие-либо проблемы или вопросы, вы можете обратиться за помощью на наш форум.
Об авторе

Krik99

Нет информации об авторе...
Krik99
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики