Suchen und eliminieren
- VB.NET
Sie verwenden einen veralteten Browser (%browser%) mit Sicherheitsschwachstellen und können nicht alle Funktionen dieser Webseite nutzen.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Es gibt 14 Antworten in diesem Thema. Der letzte Beitrag () ist von Monte.
-
-
Hey,
VisualNerd123 schrieb:
Mein Code für das auslesen kann ich net posten weil die Funktion(VB knopf) rumspinnt.
Bitte den Code nachreichen; ggfs. diese Anleitung beachten: [VB 2010] DataGridView einzelne Spalten und Zeilen auslesen
Gruß, Manschula -
-
VB.NET-Quellcode
- Public Akkpos As Integer = 0
- Public Function ReadSaveNames(ByVal stPos As Integer, ByVal ReadToEnd As String) As String
- Akkpos = GetSaveName(ReadToEnd.IndexOf(",", stPos), ReadToEnd)
- Return GetSaveName(ReadToEnd.IndexOf(",", stPos), ReadToEnd)
- End Function
- Private Function GetSaveName(ByVal Pos As Integer, ByVal ReadToEnd As String)
- ReadToEnd.Remove(Pos, ReadToEnd.Length - Pos - CountChar(",", ReadToEnd))
- Return ReadToEnd
- End Function
- Public Function CountChar(ByVal _char As Char, ByVal ReadToEnd As String) As Integer
- Dim posi, Suchst As Integer
- Suchst = 0
- Dim count As Integer = 0
- Do
- posi = ReadToEnd.IndexOf(_char, Suchst)
- Suchst = posi + 1
- If posi < 0 Then
- Exit Do
- Else
- count += 1
- End If
- Loop
- Return count
- End Function
Dass ist mein Code zum Suchen.Der Fehler:In der Datei ist folgender Text :"Test1,Test2,Test4".Aber wenn ich die Funktion aufrufe meckert VB nicht rum,sondern gibr mir Test1,Test2,Test4 in der Listbox wieder. -
-
Nein.Es kommt immer noch Test1,Test2,Test4.Und nur einmal.Ich hab auch noch diese For-Schleife rausgeschmissen.Und davor kam es Falsch aber dreimal.Und die Variable saves ist so deklariert:
-
VisualNerd123 schrieb:
Wie kann ich in VB2010 es so machen das ein String nur von Position A nach Poition B ausgelsen wird?
Skybird schrieb:
Das sind ja Ubisoftmethoden hier !
-
Goddamn.
VB.NET-Quellcode
- Dim orig As String = "This,is,crap"
- Dim res As String() = ReadSaveNames(1, ","c, orig) ' = {"this", "is", "crap"}
- Dim res1 As String = res(0) ' = "this"
- Dim res2 As String = res(1) ' = "is"
- Dim res3 As String = res(2) ' = "crap"
- Public Function ReadSaveNames(splitChar As Char, text As String) As String()
- Return text.Split(splitChar, text)
- End Function
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „AliveDevil“ ()
-
@AliveDevil: Geht das überhaupt?
text.Split() gibt ja ein String-Array zurück.
text.Split()(Index) gibt also das Elemen an dem Index zurück.
Return text.Split()(Index) stimmt also nicht mit der Signatur der Funktion (As String()) überein.
@VisualNerd123: Was genau möchtest Du tun?
Du hast diesen Text: "Test1,Test2,Test4"
und was möchtest Du davon haben?
Was soll am Ende herauskommen?"Luckily luh... luckily it wasn't poi-"
-- Brady in Wonderland, 23. Februar 2015, 1:56
Desktop Pinner | ApplicationSettings | OnUtils -
-
-
msdn.microsoft.com/de-de/libra….forms.listbox.items.aspx
> msdn.microsoft.com/de-de/libra…box.objectcollection.aspx
---> msdn.microsoft.com/de-de/libra…tcollection.addrange.aspx
mit meinem Code von oben und es geht bestens. -
Gruß Mangafreak
-
-
-
4 Benutzer haben hier geschrieben
- Gast (12)
- vb-checker (1)
- Niko Ortner (1)
- Mangafreak1995 (1)