Как использовать inputbox при копировании файла?

[Gilman]

Пытаюсь использовать такой вариант

Dim Fname As String
Fname = Val(InputBox("input"))
FileCopy File1.Path & "\" & File1.List(File1.ListIndex), File1.Path & "\" & Fname & ".rtf"

но выскакивает ошибка.

[Viper]

Пытаюсь использовать такой вариант

Dim Fname As String
Fname = Val(InputBox("input"))
FileCopy File1.Path & "\" & File1.List(File1.ListIndex), File1.Path & "\" & Fname & ".rtf"

но выскакивает ошибка.

А как ты думаешь, что делает функция Val?
З.Ы. Это вообще конечно в цитаты надо.

[Gilman]

я незнаю. я вообще нуб в Vb, неделю тока в vb ковыряюсь

[Viper]

я незнаю. я вообще нуб в Vb, неделю тока в vb ковыряюсь

Если незнаешь, то зачем применяешь? Эта функция преобразовывает свой аргумент в число. Оно тебе надо?

[Gilman]

применил потому что видел в примерах, теперь понимаю почему имя получается 0.rtf

может подскажешь как правильно использовать inputbox в данном случае?

[Viper]

как то так

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

Dim sFileName As String
sFileName = InputBox("Input")

Но лучше использовать для получения имени файла стандартные диалоги Windows.

[Gilman]

хм странно в первый раз также делал не получилось, спасибо