Сортировка данных в txt файле. - VB
Формулировка задачи:
Y menay est file.txt i dannue v etom file. Vce dannue meshdy soboy otsortirovanu s pomoshu tab. Kak mne rasbit eti dannue?
Saranee blagodarna
Решение задачи: «Сортировка данных в txt файле.»
textual
Листинг программы
Private Sub Command1_Click() 'загружааем файл Dim FN As Integer FN = FreeFile Dim FName As String FName = 'D:1.txt' Open FName For Input As #FN Text1.Text = Input(LOF(FN), #FN) Close #FN 'разбиваем на отдельные элементы, загоняя в массив Dim str1() As String Dim st As String str1 = Split(Text1.Text, vbTab) 'что нам и требовалось найти For i = 0 To UBound(str1) MsgBox str1(i) Next End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д