File Directory VB.Net

Imports System
Imports System.Windows.Forms
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Drawing.Imaging
Imports System.Drawing
Public Class MainClass
   Shared Sub Main()
        Dim file_name As String = "test.wmf"
        ' Delete the file if it exists.
        If Len(Dir$(file_name)) > 0 Then Kill(file_name)
   End Sub 
End Class