Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
If Directory.Exists("d:\aaa") = True Then
Label1.Text = "True"
Else
Label1.Text = "False"
End If
If File.Exists("d:\a.txt") = True Then
Label2.Text = "True"
Else
Label2.Text = "False"
End If
End Sub
End Class