---

Jeg er ved at lave et program der skal hente værdierne fra en
digital skydelærer der er koblet til Com1 porten. Jeg har i tidens løb
lavet en del småprogrammer i VB (p.t V5.0) med rimeligt held.
Men jeg må indrømme at jeg absolut ingen viden har omkring at læse
fra en seriel port. Jeg prøver at bruge Mscomm, og skrive resultatet ud i en tekstbox.
Der er såmænd også fint hul igennem, men det er rene heroglyffer jeg får ud af det,
hvordan får jeg oversat heroglyfferne til tal ???. Jeg har ingen dokumantation på skydelæren
og den software der fulgte med er heller ikke dokumenteret, så der er ingen hjælp at hente.

Her er den programstump jeg har prøvet med.
Jeg har også prøvet at sætte MSComm1.InputMode = comInputModeText
til MSComm1.InputMode = comInputModeBinary, og det hjælper ikke på læsbarheden.


/Jens

***program***

Private Sub Command3_Click()

Text1.Text = MSComm1.Input

End Sub

Private Sub Form_Load()

MSComm1.InputMode = comInputModeText
MSComm1.Settings = "9600, n, 8, 1"
MSComm1.PortOpen = True

End Sub

Private Sub Form_Unload(Cancel As Integer)

MSComm1.PortOpen = False

End Sub