|
Registrieren
Login
Autor
Rip_
Tutorial Leser
Anmeldedatum: 02.01.2007
Beiträge: 62
Wohnort: Schwerin
Zeile splitten
Verfasst am: 09.03.2008, 03:35
Kann mir bitte jemand sagen wie ich folgendes zu stande bekomme. Eventuell auch Vb 6 Code
Eine Textdatei in der ca 100 Zeilen sind, jede Zeile soll nun so aussehen
22:14:06, Battlefield 2, 650 MB, http://www.google.de
13:21:01, Battlefield 1942, 673 MB, http://www.google123.de
Nun möchte ich die Informationen nach und nach ins Listview einführen was aber ich nicht hinbekommen. Ich habe da an eine Splitfunktion gedacht, habe aber davon eher weniger Ahnung und auch keine passenden Sachen gefunden.
Soll dann z.B: so aussehen
Gruß Rip
PS: Frage : Wie kann ich die Zeile so auseinander nehmen das ich alles komfortable ins listview eintragen kann ?
_________________
tr4st_
« Moderator »
Anmeldedatum: 17.12.2007
Beiträge: 315
Wohnort: Private Class _ Villa()
Verfasst am: 09.03.2008, 04:43
Dafür gibt es ja die Methoden der Klasse "String"
z.B. könntest du mit EndsWith(",") was anfangen.
Die Klasse »String«
_________________
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
Rip_
Tutorial Leser
Anmeldedatum: 02.01.2007
Beiträge: 62
Wohnort: Schwerin
Verfasst am: 09.03.2008, 09:15
@ tr4st , du musst ja denken das ich gar nichts von VB.Net verstehe, ich kenne Klasse String und habe mich damit bisher die ganze Zeit rumgeschlagen, jedoch bekomme ich das nicht si nhin wi ich möchte.
Nur hilft mir die String-Klasse nicht wirklich, denn ich muss schon noch andere Funktionen habe damit ich das so hinbekomme wie ichs gerne hätte, aber ich brauch Hilfe weil ich nicht drauf komme wies gemacht wird.
StarTrekkker_
Newbie
Anmeldedatum: 05.12.2007
Beiträge: 8
Verfasst am: 09.03.2008, 11:06
also ich würde das so machen
Code:
Dim i as Integer
Dim j as Integer
Dim Textdatei as String = Fileio.filesystem.Readalltext("Pfad deiner Datei")
For i = 0 to Text.Length - 1
If Textdatei.Chars(i) = vbcr Then ' Zählt alle Zeilenschaltungen
j += 1
end if
next
For i = 0 To j -1
Listview1.Items.add(Textdatei.Split(",")(i)
Listview1.Items(i).Subitems.Add(Textdatei.Split(",")(1)
Listview1.Items(i).Subitems.Add(Textdatei.Split(",")(2)
Next
Damit sollte dann alles in der Listview sein.
Rip_
Tutorial Leser
Anmeldedatum: 02.01.2007
Beiträge: 62
Wohnort: Schwerin
Verfasst am: 09.03.2008, 13:21
Danke, das sieht gut aus aber mal ne andere Frage, hast du den Code aus dem vb ide rauskopiert oder aus dem kopf geschrieben.... Fehler = 3 ^^
Aber danke, sieht schon gut aus,
StarTrekkker_
Newbie
Anmeldedatum: 05.12.2007
Beiträge: 8
Verfasst am: 09.03.2008, 13:42
Des war so frei aus dem kopf...
Rip_
Tutorial Leser
Anmeldedatum: 02.01.2007
Beiträge: 62
Wohnort: Schwerin
StarTrekkker
Verfasst am: 09.03.2008, 13:48
Shcua die mal den Code bitte an bei items.Add(Textdatei.text ... (",") ( i )
Marduk_
« Moderator »
Anmeldedatum: 17.06.2007
Beiträge: 389
Verfasst am: 09.03.2008, 14:18
Wenn du deine Informationen in der Textdatei mit einem speziellen Zeichen trennst, zb. so:
09.03.08 ° Battlefield 2 ° 650MB ° http://www.google.de
Es sollte ein Zeichen sein, das nicht bei deinen Informationen vorkommen kann. Ein Komma ist da nicht immer das beste Zeichen.
Naja, auf jeden Fall kannst du dann mit der Split-Methode die Zeile leicht in die einzelnen Bestandteile splitten.
Code: Dim strinfo as String = "09.03.08 ° Battlefield 2 ° 650MB ° http://www.google.de"
Dim streinzeln() as String = strinfo.split("°")
for i as integer = 0 to streinzeln.length
listview.items.add(streinzeln(0))
...
Vorher musst du aber noch das Array "cleanen".
Rip_
Tutorial Leser
Anmeldedatum: 02.01.2007
Beiträge: 62
Wohnort: Schwerin
Verfasst am: 16.03.2008, 19:52
Jetzt ließt er zwar 1 zeile aus der datei, ich möchte aber das er alle zeilen runterzählt und die einträgt, komm atm mit tr4st net weiter, jemand ne idee ?
Code:
Dim sr As New IO.StreamReader(("C:\1\2.txt"))
Dim streinzeln() As String = sr.ReadToEnd.Split("+")
Dim lvitem As New ListViewItem
lvitem = ListView.Items.Add(streinzeln(0))
lvitem.SubItems.Add(streinzeln(1))
lvitem.SubItems.Add(streinzeln(2))
_________________
Marduk_
« Moderator »
Anmeldedatum: 17.06.2007
Beiträge: 389
Verfasst am: 16.03.2008, 21:16
Code: Dim sr As New StreamReader("c:\test.txt")
Dim sb() As String = sr.ReadToEnd.Split("#")
Dim sn() As String = Nothing
For i As Integer = 0 To sb.Length - 1
sn = sb(i).Split("|")
Next
Versuch es mal so.
Dann sollten die Zeilen so aussehen.
Code: 22:14:06|Battlefield 2|650 MB|http://www.google.de#
13:21:01|Battlefield 1942|673 MB|http://www.google123.de#
Also mit # am Ende und mit | voneinander getrennt
Verwandte Themen
Aufrufe
Letzter Beitrag
Wichtig: Filebrowser z.B. für ein RAT
2117
13.01.2008, 11:14
msgbox mit symbol _&_ z.B. yesno oder systemmodal
1078
26.09.2008, 23:16
Abändern eines Ordnernamens (z.B. C:\Programme = Programme)
1196
23.04.2008, 15:33
"Zurück-Funktion" mit Listview und z.B. DirView
734
17.04.2008, 13:30
Fenster auslesen z.b von icq oder msn wer online kommt
1223
11.02.2008, 16:46
