powered by simpleCommunicator - 2.0.36     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / записать в csv файле в разные столбцы
19 сообщений из 19, страница 1 из 1
записать в csv файле в разные столбцы
    #39838586
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ребята подскажите как записать в csv файле в разные столбцы , я додумался только до этого:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Sub Command3_Click()
Dim F As Integer
Dim strFile As String
'open the file
F = FreeFile
strFile = "C:\DDP\проект\db.CSV"
Open strFile For Output As #F

  Print #F, Text2.Text  
 Close #F
End Sub
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838608
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
asseiя додумалсяну если это работает, то вопрос с чем заключается?
в csv-файле нет столбцов, это просто текстовый файл, где значения разделены запятыми.
Чем запятая отличается от любого другого символа, и что именно вызывает трудности?
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838613
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro,
Код: vbnet
1.
2.
Print #F, Text2.Text; Text3.Text   = 12
Print #F, Text2.Text,  Text3.Text = 1,2



вот что в конечном итоге при открытии файла
а хотелось бы так: чейкаА1 = 1 чейкаА1 = 2
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838615
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro, ошибся вот
а хотелось бы так: чейкаА1 = 1 чейкаВ1 = 2
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838646
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
assei, используй тег кода для обрамления своей "хотелки" - а то ж ни фига не понять...
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838666
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Akina, моя "хотелка":
Код: vbnet
1.
2.
Print #F, Text2.Text   'ячейкаА1 = текст
Print #F, Text3.Text,   'ячейкаB1 = текст
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838669
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: vbnet
1.
2.
Print #F, "ячейкаА1 = " & Text2.Text   'ячейкаА1 = текст
Print #F, "ячейкаB1  = " & Text3.Text,   'ячейкаB1 = текст



но причём тут CSV?
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838671
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
, в конце не убрал
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838675
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One, я так понимаю что записать в разные ячейки не получится , как вариант прописывать открытие как xl и записывать его как в xl, А открывать как текстовый файл и записать как разные ячейки не получится
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838681
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
всё получится, только мы не можем понять, что же вы хотите.
CSV- файл является файлом с разделителем между полями(по умолчанию с запятой) и переводом строки в конце каждой строки. Вот пример содержимого такого файла:

Код: plaintext
1.
2.
3.
field1,field2
1,5
2,6
3,7
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838686
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One, файл приложил
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838688
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One,
Код: vbnet
1.
Print #F, Text2.Text, Text3.Text ' все записывается в одну ячейку
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838691
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: vbnet
1.
2.
3.
4.
5.
6.
Dim s as String
s = Text1.Text & ";" & Text2.Text & ";" & Text3.Text & ";" & Text4.Text & ";" & Text5.Text & ";"

...
Print #F, s
...
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838693
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
function makecsv(byval txt as string) as string
while instr(txt, "  ")>0
    tmp = replace(txt, "  ", " ")
wend
makecsv = replace(txt, " ", ";")
end function

' и потом 
Print #F, makecsv(TextX.Text)
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838695
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One, истина была рядом) спасибо
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838768
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One, т.е. получается при открытии строка будет перезаписываться, а подскажите как записать в другую строку?
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838819
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One, почитал и понял что это делается так
Код: vbnet
1.
Print #F, Spc(15); Text2.Text


теперь хотелось бы понять как проверить существует строка
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838837
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
asseiKonst_One, т.е. получается при открытии строка будет перезаписываться, а подскажите как записать в другую строку?Надо файл открывать не на запись, а на дозапись
...
Рейтинг: 0 / 0
записать в csv файле в разные столбцы
    #39838861
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro, т.е. так
Код: vbnet
1.
 Open App.Path & "\db.CSV" For Append As #F
...
Рейтинг: 0 / 0
19 сообщений из 19, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / записать в csv файле в разные столбцы
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]