File Directory VB.Net

Imports System
Imports System.IO
Public Class DeleteTest
    Public Shared Sub Main()
        Dim fi As New FileInfo("temp.txt")
        Dim fs As FileStream = fi.Create()
        fs.Close()
        fi.Delete()
    End Sub
End Class