Question

vb2010中如何判断当前文件夹是否存在某个文件

例如，改程序放在C:\A中，如何判定A中是否存在A.txt？如果不存在则程序提示并且自动退出？
求详细代码。写得好的再加50分。
Net 3.0

Answer 1

将窗口加载的事件处理程序改成这样：
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim filePath As String = “在此输入希望判断的文件名”
If Not(file.Exists(System.AppDomain.CurrentDomain.BaseDirectory & filePath) Then
'将应用程序存在的目录及文件名拼接起来，然后判断是否存在
Me.Close() '如果不存在，则将关闭窗口
End Sub

Answer 2

If My.Computer.FileSystem.FileExists("C:\A\A.txt") Then
MessageBox.Show("C:\A\A.txt文件已经存在", "出问题了", MessageBoxButtons.OK, MessageBoxIcon.Information)
End
End If

Answer 3

IF DIR("C:\A\A.txt")="" THEN END