Uložiť položky na zobrazenie zoznamu - Iné problémy - VB-Paradise 2

Existuje 2 Odpovede v tejto téme. Posledný príspevok (17. mája 2016, 12:59) je od RodFromGermany.

moinmoin001

Ahoj,
Asi 2 mesiace mám problém s tým, že moje položky a podpoložky zoznamu nie sú správne uložené.
A viem, že na túto tému je kopa príspevkov, ale to nie je všetko, čo chcem. Chcel by som uložiť položky do textového súboru. Každý recept do nového riadku. Pri svojich predchádzajúcich pokusoch som jednotlivé informácie (názov receptu, kategória, kalórie, autor, popis) od seba oddelil dvojbodkou („:“) a prečítal som ich:

Zdrojový kód VB.NET

1. Public Sub FillListFromFile ()
2. Dim srReader ako StreamReader
3. Dim bla ako reťazec
4. Stlmiť položky () ako reťazec
5. Dim X As Integer = 0
6. Dim OFD ako nový OpenFileDialog
7. Vyskúšajte
8. OFD.RestoreDirectory = True
9. If (OFD.ShowDialog () = DialogResult.OK) Potom
10. srReader = My.Computer.FileSystem.OpenTextFileReader (OFD.FileName)
11. Do Dokedy srReader.EndOfStream 'Dostal sa na koniec súboru
12. bla = srReader.ReadLine 'Čítať riadok
13. Jednotlivé časti = bla. Split (":")
14. „Rozložte na jednotlivé časti
15. ListView1 Items.Add (Items (1)) 'RecipeName
16. ListView1 Items (X). SubItems.Add (Items (3)) 'Kategória
17. ListView1 Items (X). SubItems.Add (Items (5)) 'Calories
18. ListView1 Items (X). SubItems.Add (Items (7)) 'Author
19. „Opis 9
20. X = X + 1
21. Slučka
22. srReader. Zavrieť ()
23. srReader.Dispose ()
24. Koniec Ak
25. Chyťte ex ako výnimku
26. „MessageBox.Show (napr. Správa)
27. Nakoniec
28. ListView1.OwnerDraw = False
29. ListView1.View = View.Details
30. Ukončite pokus
31. Koniec Sub

Ocenil by som veľa odpovedí bohatých na informácie
ps. V prílohe nájdete 2 obrázky mojej žiadosti o formulár Windows
Lg Jan

* Téma odložená, pretože to je sotva VBA. *

4,79 kB, 833 × 438, 135 zobrazení

5,55 kB, 580 × 471, 134-krát videných

Tento príspevok bol už raz upravený, naposledy ho vytvoril „Marcus Gräfe“ (14. mája 2016, 20:16).

---