Array mit Split füllen

  • VB.NET

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von Devilstar.

    Array mit Split füllen

    Hallo Zusammen,

    ich brauche eure Hilfe. Ich möchte von einen Mikrocontroller Daten an den Pc senden. Diese Daten haben das Format 343:243:343: . Dabei sollen die doppel Punkte die Trennzeichen sein. Diese Zahlen sollen nun in 3 einzelnen Textboxen erscheinen. Habe es bis jetzt nur geschafft, die erste Zahl in einer Textbox zu schreiben. Die zweite und dritte Zahl funktioniert nicht, ich vermute es liegt an die "befüllung" der Array.

    Erst mal mein Code:

    VB.NET-Quellcode

    1. Public Class Form1
    3. Dim inputData As String
    4. Dim eingabe As String
    5. Dim sArray() As String
    7. Private Sub cmd_verbinden_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmd_verbinden.Click
    8. Try
    9. SerialPort1.PortName = txt_port.Text
    10. SerialPort1.BaudRate = txt_baud.Text
    11. SerialPort1.Open()
    12. cmd_verbinden.Enabled = False
    13. txt_port.BackColor = Color.Green
    14. txt_baud.BackColor = Color.Green
    16. Catch ex As Exception
    17. MsgBox("Verbindung konnte nicht hergestellt werden")
    19. End Try
    20. End Sub
    22. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    23. SerialPort1.Parity = IO.Ports.Parity.None
    24. SerialPort1.DataBits = 8
    25. SerialPort1.StopBits = IO.Ports.StopBits.One
    26. SerialPort1.Handshake = IO.Ports.Handshake.None
    27. SerialPort1.RtsEnable = True
    28. End Sub
    30. Private Sub SerialPort1_DataReceived(ByVal sender As System.Object, _
    31. ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) _
    32. Handles SerialPort1.DataReceived
    33. inputData = SerialPort1.ReadLine
    35. End Sub
    37. Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    39. sArray = Split(inputData, (":"))
    41. txt_x.Text = sArray(0)
    42. txt_y.Text = sArray(1)
    43. End Sub
    45. End Class

    Mein Fehler kommt bei

    VB.NET-Quellcode

    1. txt_y.Text = sArray(1)
    . Hier kommt die Fehlermeldung: Der Index war außerhalb des Arraysbereichs. Würde mich freuen, wenn mir jemand helfen könnte.

    Grüße

    //Edit: Musste leider so den Code einfügen. Irgendwie hat der sonst keine Absätze gemacht und der ganze Code war in 3 Zeilen untergebracht.

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „Devilstar“ ()

    Brauche den Timer, weil ich durchgehend Daten vom IC bekomme und diese dann immer wieder neu in die Textbox geladen werden soll.

    Hatte das " " noch im Code drin um was auszuprobieren (mein Fehler). Sollte natürlich ":" sein. Werde es sofort Edieren.

    Unterschied zwischen String und char ist klar.

    Grüße