имя файла из текстбокса

[twist]

здравствуйте! возникла задачка. помогоите пожалуйста нужно в VB сделать следующее. в программе в текст бокс забивается значение, затем записывается в переменную obr далее у меня формируется файл, необходимо чтоб имя файла задавалось теми данными которые записались в переменную obr. заранее спасибо. т.е. в текстбокс забили с клавиатуры "123", затем "123" записалось в переменную obr дак вот имя файла должно быть 123.txt. и еще нюанс запись в файл вот так осуществляется у меня Open "c:\vigruzka\test.txt" For Output As #1 т.е. мне надо как то после записи в файл переименовывать test.txt в 123.txt например. где 123-значение текстбокса.

[GDK]

FSO. Либо операторы и ф-ции для работы с файлами/папками. Типа Dir(), Kill, Copy и проч.

[twist]

Либо операторы и ф-ции для работы с файлами/папками. Типа Dir(), Kill, Copy и проч.

подробнее можно. я начинающий.даже неподробнее а именно код написать можете?

[Twister]

Может стоит все-таки начать с книг?

Open "c:\vigruzka\" & obr & ".txt"

[Gogic]

RTFM. Такой код есть даже в самом простейшем учебнике.

[twist]

[quote]Может стоит все-таки начать с книг?[quote]
конечно вы правы я итак много читаю литературы по vb просто пока недоходит до меня как сделать имено имя файла из переменной.

[Diamock]

Код: Выделить всё

'Процедура создания файла
Sub CreateFile(FileName As String, Content As String)
'FileName - Имя файла
'Content - То, что записываем в файл

Dim ff As Integer       'Переменная для хранения
                        'номера свободного канала
                        'для доступа к файлу

    ff = FreeFile       'Получаем номер свободного
                        'канала
   
    Open FileName For Output As #ff     'Открываем файл
    Print #ff, Content                  'Записываем в файл
    Close #ff                           'Закрываем канал
End Sub

'Применение

Private Sub Command1_Clic()
Dim obr As String
obr = Text1.Text        'Получаем имя файла из твоей
                        'переменной
'Вызываем процедуру создания файла
CreateFile obr & ".txt", Text2.Text
End Sub

А, вообще, как сказал Twister, это основы, почитай статьи с основного сайта и, поиск, как всегда рулит
p.s. VB под руками нет, код может содержать ошибки