VPF::данные из textbox –а в Excel - Форум программистов

observateur

Дата 8.3.2007, 20:58 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 176
Регистрация: 10.6.2006

Репутация: нет
Всего: нет

Как мне записать данные из textbox –а в Excel-овскую лист последователно.
Private Sub Command1_Click()
Open "d:\hello.txt" For Output As #1
Print #1, Text1.Text
Print #2, Text1.Text
Print #3, Text1.Text
Print #4, Text1.Text
Close #1
End Sub
Дает ошибку…помогите чайнику…

Kirill89

Дата 8.3.2007, 21:22 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 501
Регистрация: 17.10.2006
Где: Питер

Репутация: 3
Всего: 4

Причем тут excel?
Ты пытаешься просто записать данные в файл последовательно?
тогда так

Код


Dim textout As String
Open "d:\hello.txt" For Output As #1 
textout = Text1.Text 
Print #1, textout 
textout = Text2.Text 
Print #1, textout 
textout = Text3.Text 
Print #1, textout 
Close #1 
End Sub

#1 - это не значение строки, а номер файла. В идеале, надо писать:

Код


Dim file As Integer
file=FreeFile()
Open "d:\hello.txt" For Output As #file
print #file, 'первая строка
print #file, 'вторая строка
print #file, '.......................
Close #file

--------------------

GSteam[dot]info

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »