Пример в этой статье описывает, как открывать и сохранять текстовые файлы с помощью VB. Поделитесь этим со всеми для справки. Подробности следующие:
Private Sub cmdsave_Click()Dim filelocation As String' загружает сохранение как поле commondialog1.ShowSave filelocation = commondialog1.FileName' добавляет сохранение поверх файла, если это помогает Открыть расположение файла Для Append As #1 Print #1, text1.text Close #1End SubPrivate Sub cmdopen_Click ()Dim filelocation As String' показывает открытое поле commondialog1.ShowOpen filelocation = commondialog1.FileName' input файлы в text1.text Открыть местоположение файла Для ввода как #1Do До EOF(1) Ввод #1, данные text1.text = text1.text + Data + vbNewLine EOF (1) Loop Close #1End Sub
Я надеюсь, что эта статья будет полезна всем, кто занимается программированием на VB.