Mega Code Archive

 

Categories / VB.Net / File Directory

 

Get an available file number

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