Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Pripojte vývoj AVR doska k PC pomocou sériového kábla . Uistite sa , že máte AVR doska zapnutie a spustenie programu v mikrokontroléru zvládnuť prijíma alebo vysiela sériová dáta .
2
Instantizujeme sériového portu objektu v VB . Budete musieť vytvoriť inštanciu sériový port s komunikačnými parametrami pred otvorením a prijíma alebo vysiela dáta . Nasledujúci zdrojový kód môže byť použitý na vytvorenie inštancie sériového portu objektu pomocou COM1 a 9600 Baud :
Dovoz SystemImports System.IO.Ports
Public Class SerialExampleFormDim WithEvents Port Ako SerialPort = _new SerialPort ( " COM1 " , 9600 , Parity.None , 8 , StopBits.One )
3
Prenos dát do AVR . Nasledujúci podprogram odovzdá text z textového poľa s názvom " txtTransmitData " , keď tlačidlo s názvom " btnTransmitData " kliknutie . Uistite sa , že ste vložili textové pole a tlačidlo na formulári .
Private Sub btnTransmitData_Click ( byval sender Ako System.Object , _ByVal e As System.EventArgs ) Kľučky btnTransmitData.ClickPort.Open ( ) Port.Write ( txtTransmitData.Text ) Port.Close ( ) End Sub
4
Príjem dát z AVR v VB . Podprogram forma zaťaženie zaisťuje sériový port je otvorený na zaťaženie formulára . DataReceived podprogram má charakter čítanie zo sériového portu a zobrazí ho v textovom poli s názvom " TextBox1 . " Uistite sa , Visual Basic formulár obsahuje ovládací prvok textové pole s názvom Texbox1 . Tiež prijímať sériová dáta , pamätajte , že port musí byť otvorený .
Private Sub SerialExampleForm_Load ( ByVal sender As Object , byval e ako System.EventArgs ) Kľuky Me.LoadCheckForIllegalCrossThreadCalls = FalseIf Port.IsOpen = false port . Otvorte ( ) End Sub
Private Sub Port_DataReceived ( byVal sender As Object , byval e AsSystem.IO.Ports.SerialDataReceivedEventArgs ) Kľuky Port.DataReceivedTextBox1.Text = " " TextBox1.Text = Port.ReadChar ( ) End sub