hallo!
Ich bräuchte mal wieder Hilfe! :D
Und zwar möchte ich einen String mit Hilfe von instr() in mehrere Teile zerlegen.

Mein String zb.: "1290;680:50:63:12.8;22.7;" (das Semikolon kommt in meinem String als Trennzeichen vor)

meine variablen rpm1,rpm2,pwm1,pwm2,temp1 und temp2 alle integer

wie bekomme ich jetzt die "1290 in rpm1" die "680 in rpm2" die "50 in pwm1" usw. ?(

Gruß P.K.er

Mit InStr() wird das wohl nicht gehen, da ein Integer-Wert des ersten Vorkommens vom gesuchten Zeichen zurück gibt.
Du solltest dir eine eigene Funktion erstellen, die die Werte auslesen kann.

Ein String kannst Du mithilfe der Split-Methode in ein Array zerlegen. Beispiel:

kleinM schrieb:

Mit InStr() wird das wohl nicht gehen, da ein Integer-Wert des ersten Vorkommens vom gesuchten Zeichen zurück gibt.

ups!
Also würde es gehen wenn es Strings währen?
ich kann die strings ja später noch in integer umwandeln?

p.k.er schrieb:

die strings ja später noch in integer umwandeln?

Ja. Die passende Methode dafür wäre beispielsweise Integer.TryParse.

Gut wie würde das mit instr() dan aussehen?
Das ist mein eigentliches Problem.

Hier ein kleiner Denkanstoß:



Wird wahrscheinlich nicht alles Stimmen, aber das wäre ein Ansatz...

Zwei Sachen:
1. Warum sind Doppelpunkte UND Semikolons im Inputstring?
2. 12.8 und 22.7 sind keine Integer.

@kleinM: Übelster Bullshit, vor allem das mit InStr.

lg SeriTools

SeriTools schrieb:

1. Warum sind Doppelpunkte UND Semikolons im Inputstring?

Sorry Tippfehler es sollten natürlich alles Semikolons sein!

und haste ein besseren vorschlag wenn ales bullshit ist?

p.k.er schrieb:

instr()

ist eine böse Funktion, sie ist nur wegen der VB6-Kompatibility vorhanden.
Nutze die mächtigen .NET-String-Funktionen.

Achso das meint ihr :pinch: Dem bin ich über den Weg gelaufen, habs aber ignoriert...
Hier ein Link dazu:
openbook.galileocomputing.de/vb_net/msvb060001.htm

Du hast eine traumhafte Lösung von @xtts02:
Siehe einfahc die Posts davor.

lg

p.k.er schrieb:

und haste ein besseren vorschlag wenn ales bullshit ist?

[VB 2010] String mit instr() in mehrere Teile zerlegen

RodFromGermany schrieb:

Nutze die mächtigen .NET-String-Funktionen.

Die da währen? mir war da nur noch instr() im sinne.

Hier habe ich erstmal noch meinen code damit Ihr überhaupt wisst worum es geht.

p.k.er schrieb:

mir war da nur noch instr() im sinne.

Das ist KEINE .NET-Funktion. Schau dir doch die Methoden der String-Klasse im Objektbrowser an.

xtts02 schrieb:

Ein String kannst Du mithilfe der Split-Methode in ein Array zerlegen. Beispiel:

VB.NET-Quellcode

1. Dim input = "1290;680:50:63:12.8;22.7;"
2. Dim felder() = input.Split(";"c)
3. For index = 0 To felder.Length - 1
4. MessageBox.Show("FeldIndex: " & index & " - FeldWert: " & felder(index))
5. Next

danke das hat mich erstmal weiter gebracht!

Ich bekomme es einfach nicht so hin wie es sein sollte.
Das Splitten funktioniert erstmal.
Ich habe da noch einen Denkfehler irgendwo drin.

Die Werte kommen immer in unterschiedlichen Labels raus nicht da wo sie hingehören, Warum?

VB.NET-Quellcode

1. Dim comein As String Dim rpm1 As String Dim rpm2 As String Dim pwm1 As String Dim pwm2 As String Dim temp1 As String Dim temp2 As String
2. Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived Try comein = SerialPort1.ReadLine Me.Invoke(New EventHandler(AddressOf auswertung)) Catch ex As Exception
3. End Try
4. End Sub
5. Private Sub auswertung()
6. Dim felder() = comein.Split(";") For index = 0 To felder.Length - 1
7. If index = "0" Then rpm1 = felder(index) End If
8. If index = "1" Then rpm2 = felder(index) End If
9. If index = "2" Then pwm1 = felder(index) End If
10. If index = "3" Then pwm2 = felder(index) End If
11. If index = "4" Then temp1 = felder(index) End If
12. If index = "5" Then temp2 = felder(index) End If
13. Next
14. Label1.Text = rpm1 Label2.Text = rpm2 Label3.Text = temp1 Label4.Text = temp2 Label5.Text = pwm1 Label6.Text = pwm2
15. End Sub

Formatier den Code erstmal richtig.

1. Keine VB-Formatierung
2. OPTION STRICT ON
3. Wofür die For-Schleife?