Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Odkaz SerialPort triedy v programe . Táto zostava môže byť použitá s Visual Basic rovnako ako ostatné . NET jazyky . Zadajte nasledujúci príkaz v hornej časti súboru kód : Spojené
Dovoz System.IO.Ports
2
Nastavte nastavenie portu a otvorte sériový port . Tento kód môže byť vložená v rade miest v programe ako " Load " udalosti formulára alebo v reakcii na tlačidlá sa tlačil . Nasledujúci príklad nastaví parametre pre sériový port COM1 :
Dim myComPort ako New SerialPort
Skúste
Ak nie je myComPort.IsOpen Potom
myComPort.PortName = " COM1 "
myComPort.BaudRate = 1200
myComPort.Parity = Parity.None
myComPort.DataBits = 8
myComPort.StopBits = StopBits . Jedna mladá
myComPort.Handshake = Handshake.None
myComPort.ReadTimeout = 3000
myComPort.WriteTimeout = 5000
myComPort.Open ( )
End If
Chytiť --- ( Chyby )
End Try
3
Odoslať riadiace kódy k mikrokontroléru pripojený k krokový motor . Rôzne kombinácie regulátorov a motorov budú mať rôzne požiadavky na kóde , takže musíte nájdete v dokumentácii výrobcu pre špecifické kódy a forme , v ktorej regulátor očakáva ich prijatie . Napríklad , nasledujúci kód odošle príkaz " Go " ako 8 - bitové , ASCII znaky :
myComPort.Writeline ( " GO " )
odpoveď = myComPort.Readline
4
zatvorte port pri dokončení odosielania príkazov . " End Použitie " vyhlásenie uvoľní prostriedky na sériový port a uzavrie ju ku komunikácii . Pridať tento kód buď " FormClosing " rutiny udalosti alebo na konkrétnej ponuke alebo riadenie udalostí :
Použitie myComPort
Ak myComPort.IsOpen Potom
robiť , keď ( myComPort. BytesToWrite > 0 )
Loop
End If
End Použitie