@antidzn Da steht alles:
RodFromGermany schrieb:
VB.NET-Quellcode
- Public Class Form1
- Private Property temperature As Double
- Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
- SerialPort1.PortName = "COM14"
- SerialPort1.BaudRate = 19200
- SerialPort1.Parity = IO.Ports.Parity.None
- SerialPort1.NewLine = vbCr
- SerialPort1.Encoding = System.Text.Encoding.UTF8
- SerialPort1.Open()
- End Sub
- Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
- Me.SerialPort1.Write("D")
- End Sub
- Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
- Dim s As String = Me.SerialPort1.ReadExisting()
- temperature = CInt(s) / 100.0
- Me.Invoke(Sub() Me.TextBox1.AppendText(String.Format("{0:0.00} °C", temperature)))
- End Sub
- ' ...
Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert!
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert!