VB.Net/File Directory/FreeFile

Материал из VB Эксперт
Версия от 15:45, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Get an available file number

<source lang="vbnet"> Imports System Imports System.Collections.ObjectModel Imports System.IO Public Class MainClass

  Shared Sub Main()
       " Get an available file number.
       Dim file_num As Integer = FreeFile()
       Console.WriteLine( file_num )
  End Sub 

End Class

      </source>