Программирование
Веб программирование

Файлы в visual basic. Введение

 
 

В этом разделе я расскажу о файлах, верней не о них, а как с ними работать, т.е. открывать, изменять, кидать...
Для открытия файлов(НЕ ЗАПУСКА!!!) есть функция open:

open "имя файла" for режим as номер канала
Функции для работы с файлами
Close Номер св. канала

Имя файла - полный путь к файлу(если файл находится в той же папке где и сама программа, то можно написать просто имя файла(например, 1.txt))
Режим - режим открытия файла, есть около 7 режимов, но в этом шаге мы рассмотрим только 3 основных:

  1. Input - служит для чтения данных из файла, если файла не существует, то происходит ошибка
  2. Append - файл открывается(НЕ ДЛЯ ЧТЕНИЯ!!!) для записи, если файла не существует, то он создается. Если в файле уже есть какие либо данные, то запись идет в конец этих данных.
  3. Output - файл открывается(НЕ ДЛЯ ЧТЕНИЯ!!!) для записи, если файла не существует, то он создается. Все данные которые были в файле стираются, и запись идет в "чистый файл"

Номер канала - это номер канала открываемого файла, если номер открываемого файла уже открыт, то происходит ошибка


Есть вопросы? Спроси на нашем форуме!!
ilf [09.01.2013 20:22]

еще в начало кода нужно написать:(номер канала)=freefile
пример:
D=freeFile
open "c:/1.ini" for append as d

Гость [09.01.2013 22:49]

Не надо так делать, ибо это грех.
Вот так правильнее:
open "C:1.ini" for append as #1
'''что то делаем...
close #1

И где вы видели, чтобы конфигурационные файлы(conf,ini,inf)открывали как обычный текстовый? Удобнее ведь GetPrivateProfileString/WritePrivateProfileString!

Гость [09.01.2013 22:50]

слэш забыл : open "C:1.ini"

Гость [09.01.2013 22:51]

Автор вам все правильно написал.

Samou4120 [08.03.2013 12:09]

Кто подскажет?
Как в коде установить мультилайн на тру ?

Text1.MultiLine = True ' не получается

rezerf121 [18.06.2014 18:53]

Выдаёт ошибку.
Предполагается наличие окончания конструкции
Код: 800A0401

yulius [09.12.2014 02:15]

Возможно ли задать (присвоить) файлу имя, соответствующее значению, высвечиваемому в компоненте Combo1?

pjp07190 [09.12.2014 08:32]

Dim filename As String
Private Sub Command1
Click()
filename = Combo1.Text
MsgBox file
name
End Sub

Private Sub Form_Load()
Combo1.AddItem ("COM1")
Combo1.AddItem ("COM2")
Combo1.AddItem ("COM3")
Combo1.AddItem ("COM4")

End Sub

Cariton [29.05.2016 12:18]

Всем доброго времени суток может кто может помочь с заданием на екзамен я никак не могу понять с чево мне начать делать задание вот такое: "Создать програму для переименование файла. Предусмотреть возможность задания старого и нового имены файла.В случае неверного задания имени файла вывести при помощи окна MessageBox соответствующее сообщение .

pjp07190 [31.05.2016 12:16]

Язык какой VB6? VB.Net?



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.