在vb.net中怎樣判斷一個文件已經存在？？？

Dim objFile As System.IO.File

站在用戶的角度思考問題，與客戶深入溝通，找到天河網站設計與天河網站推廣的解決方案，憑借多年的經驗，讓設計與互聯網技術結合，創造個性化、用戶體驗好的作品，建站類型包括：成都網站建設、成都網站設計、企業官網、英文網站、手機端網站、網站推廣、域名注冊、虛擬主機、企業郵箱。業務覆蓋天河地區。

If objFile.Exists("C:\a.txt") Then

FileOpen(1, "c:\a.txt", OpenMode.Append)

Else

FileOpen(1, "c:\a.txt", OpenMode.Output)

End If

vb.net 如何判斷網絡地址上的指定文件是否存在

Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long

這是封裝在Shell32.DLL系統文件里的一個函數，既可以判斷本地文件是否存在，又可以判斷遠程電腦上的文件是否存在。函數返回值是個Long型變量，返回兩個值0,1。1表示文件存在(True),0表示文件不存在(False)。而且只有一個參數szPath,是個字符串變量，如果要判斷本地的文件是否存在其路徑可寫為：”C:\Windows\Config\SysBook.Txt”)，如果文件在遠程電腦上，其路徑可寫為（假設對方電腦IP為192.168.0.2)

"\\192.168.0.2\d$\javatools\somefile.txt",如果其電腦名為WorkStation可寫為

“\\workstation\javatools\somefile.txt"，當然這個函數還可以查找網站上的網頁文件如：""

我們可以寫個簡單的自定義公用函數來完成這個功能，在自定義函數里調用這個API函數

Public Function GetFileExists(ByVal FileName As String) As Boolean

If FileName = "" Then

MsgBox "請輸入文件名", vbInformation, "提示"

Exit Function

Else

GetFileExists = CBool(PathFileExists(FileName))

End If

End Function

在窗體界面上加一按鈕,和一文本框

Private Sub Command1_Click()

Dim T As Boolean

T = GetFileExists("F:\it\Develope\Retail\Bill\vssver.scc")

If T = True Then

Text1.Text = "該文件存在"

Else

Text1.Text = "該文件不存在"

End If

End Sub

當然GetFileExists其中的參數還可以寫成

"\\192.168.0.2\d$\javatools\somefile.txt"

"\\workstation\javatools\somefile.txt"

""

這個函數除了能判斷文件是否存在外，還可以判斷本地或遠程文件夾

是否存在，我覺得這要比用Dir這個VB自帶函數來判斷文件是否存在要好用多了，而且也不需要調用FileSystemObject組件來操作了。

vb.net 怎么判斷一個文件夾或是文本文件的存在?如果沒有則創建……求代碼!不要VB6.0的

判斷和創建可以放在一起。

創建空文件夾：

Directory.CreateDirectory(文件夾完整路徑)

'系統會自動判斷文件夾是否存在，不存在就創建

判斷并創建空文件：

Using?fs?As?New?FileStream("f.txt",?FileMode.OpenOrCreate)

'你可以用這個FileStream做其它事情??

End?Using

VB.net怎樣保存文件

保存文件的步驟為：

關閉流，特別是寫入流

關閉并保存文件

示例代碼如下：

Imports?System.Windows.Forms

Imports?System.IO

Imports?System.Text

Sub?SaveFileDemo()

'打開文件。如果文件不存在則創建新的文件

Dim?myFile?As?New?IO.FileStream("d:\data.txt",?_

FileMode.OpenOrCreate,?_

FileAccess.Write)

'在文件末尾添加一行?

Dim?tw?As?New?StreamWriter(myFile)

myFile.Seek(0,?SeekOrigin.End)

tw.WriteLine("白刃格斗英雄連英模部隊方隊亮相閱兵")

'關閉流

tw.Close()

'關閉文件并保存文件

myFile.Close()

End?Sub

VB.NET 明明文件存在,為何shell的方法打不開,還有沒有其他方法可以直接打開EXE文件?

shell肯定是路徑的問題，.net有自己的類庫可以實現這個功能。你用

Process.Start(路徑)即可解決實現