Visual Basic, .NET, ASP, VBA, VBScript
 
  Справочники  
  Справочник по Windows API Справочник по Visual Basic  
     
  Функция FreeFile  
 

Функция

FreeFile

Синтаксис

FreeFile[(rangenumber)]

Функция используется для возвращения свободного номера файла, который можно использовать при открытии файла инструкцией Open. Возвращает значение типа Integer в диапазоне от 1 до 511.

Параметры

Наименование

Описание

RangeNumber

Необязательный. Число типа Variant, указывающее диапазон, из которого возвращается следующий свободный номер файла. Значение 0 (используется по умолчанию) задает возвращение номера файла из диапазона 1 – 255 включительно. Значение 1 задает возвращение номера файла из диапазона 256 – 511

Замечания

Рекомендуется всегда использовать эту функцию при открытии файла во избежание различных проблем, так номер должен быть уникален.

Пример использования

'используем функцию FreeFile
'для определения следующего свободного номера файла
'в цикле последовательно открываются для вывода данных
'пять файлов, в каждый из которых записываются некоторые данные
Dim MyIndex, FileNumber
'выполняем цикл 5 раз
For MyIndex = 1 To 5
    'определяем свободный номер файла
   
FileNumber = FreeFile
    'создаем файл
    Open "vbnet" & MyIndex & ".txt" For Output As #FileNumber
    ' выводим текст
    Write #FileNumber, "VBNet - сайт о Visual Basic!"
    'закрываем файл
    Close #FileNumber
Next MyIndex

Дополнительная информация

Категория: Работа с файловой системой

Еще функции: CurDir, Dir, EOF, FileAttr, FileDateTime, FileLen, FreeFile, GetAttr, Input, Loc, LOF, Seek

 
     
  VBNet online (всего: 51524)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     

смс, отправка смс

Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам