Как заполнить массив из файла в Visual Basic 6.0 - VB
Формулировка задачи:
В текстовом файле есть строка из чисел 500 1000 1500 2000 2500 3000 3500 4000 4500 5000, нужно их записать в массив и вывести в лист бокс.
Решение задачи: «Как заполнить массив из файла в Visual Basic 6.0»
textual
Листинг программы
- Dim s As String
- 'Dim a(0 To 9) As String
- Dim a() As String
- Open "C:\Users\Александр\Desktop\курсовая\11.txt" For Input As #1
- Line Input #1, s
- close 1 '!!!
- 'a(i) = s '?
- a =split( s) '!
- For i = 0 To ubound(a) '9
- List1.AddItem a(i)
- Next i
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
