запуск таймера через com-порт. VB6 - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)

- - запуск таймера через com-порт. VB6 (http://forum.oszone.net/showthread.php?t=277455)

K@kTuS

10-02-2014 12:37 2306449

запуск таймера через com-порт. VB6

кому не сложно, напишите кусок кода.
требуется, что бы при перемыкании двух контактов com-порта запускался/останавливался таймер.
VB6.

K@kTuS

10-02-2014 14:08 2306514

разобрался

lxa85

10-02-2014 14:59 2306563

Цитата:

Цитата K@kTuS

разобрался »

поделись? :)

K@kTuS

11-02-2014 10:19 2307113

Код:

MScomm1.CommPort = 1

MScomm1.PortOpen = True

MScomm1.Settings = "1200,N,8,1"

MScomm1.DTRenabled = True

Timer2.Interval = 5



Private Sub timer2_timer()

If mscomm1.CTSholding = True Then

timer1.enanled = True

End If

End Sub

использовал cts и dtr

Время: 21:21.