Зберегти елементи перегляду списку - Інші проблеми - VB-Paradise 2

існує 2 Відповіді в цій темі. Останнє повідомлення (17 травня 2016 р., 12:59) - від RodFromGermany.

moinmoin001

Привіт,
Приблизно 2 місяці у мене виникає проблема з тим, що елементи перегляду списку та підпункти зберігаються неправильно.
І я знаю, що на цю тему є маса публікацій, але це не все, що я хочу. Я хотів би зберегти елементи у текстовому файлі. Кожен рецепт у новому рядку. У своїх попередніх спробах я відокремив окрему інформацію (назва рецепта, категорію, калорії, автора, опис) двокрапкою (":") і прочитав їх:

Вихідний код VB.NET

1. Public Sub FillListFromFile ()
2. Затемнити srReader як StreamReader
3. Приглушено бла, як струна
4. Затемнити елементи () як рядок
5. Заміряти X як ціле число = 0
6. Помутніти OFD як новий OpenFileDialog
7. Спробуйте
8. OFD.RestoreDirectory = Істинно
9. Якщо (OFD.ShowDialog () = DialogResult.OK) Тоді
10. srReader = My.Computer.FileSystem.OpenTextFileReader (OFD.FileName)
11. Do do srReader.EndOfStream 'Досягнуто кінця файлу
12. bla = srReader.ReadLine 'Прочитати рядок
13. Окремі частини = бла. Розділити (":")
14. 'Розберіть на окремі частини
15. ListView1.Items.Add (Items (1)) 'RecipeName
16. ListView1.Items (X) .SubItems.Add (Items (3)) 'Категорія
17. ListView1.Items (X) .SubItems.Add (Items (5)) 'Калорії
18. ListView1.Items (X) .SubItems.Add (Items (7)) 'Автор
19. 'Опис 9
20. X = X + 1
21. Петля
22. srReader. Закрити ()
23. srReader.Dispose ()
24. Завершити якщо
25. Catch ex Як виняток
26. 'MessageBox.Show (напр. Повідомлення)
27. Нарешті
28. ListView1.OwnerDraw = Неправильно
29. ListView1.View = Переглянути.Деталі
30. Кінець Спробуйте
31. Кінець Sub

Я був би вдячний за багато інформаційних відповідей
ps. Вкладене ви знайдете 2 фотографії моєї програми Windows Form
Lg Jan

* Тема відкладена, оскільки це навряд чи VBA. *

4,79 кБ, 833 × 438, 135 переглядів

5,55 кБ, 580 × 471, переглянуто 134 рази

Цю публікацію вже редагували 1 раз, востаннє "Marcus Gräfe" (14 травня 2016 р., 20:16)

---