vb dir函數(shù)用法

Private?Sub?Command1_Click()

公司主營業(yè)務(wù)：成都網(wǎng)站建設(shè)、網(wǎng)站制作、移動(dòng)網(wǎng)站開發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實(shí)現(xiàn)互聯(lián)網(wǎng)宣傳，提高企業(yè)的競(jìng)爭(zhēng)能力。創(chuàng)新互聯(lián)公司是一支青春激揚(yáng)、勤奮敬業(yè)、活力青春激揚(yáng)、勤奮敬業(yè)、活力澎湃、和諧高效的團(tuán)隊(duì)。公司秉承以“開放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化，感謝他們對(duì)我們的高要求，感謝他們從不同領(lǐng)域給我們帶來的挑戰(zhàn)，讓我們激情的團(tuán)隊(duì)有機(jī)會(huì)用頭腦與智慧不斷的給客戶帶來驚喜。創(chuàng)新互聯(lián)公司推出遼源免費(fèi)做網(wǎng)站回饋大家。

Dim?file?As?String

file?=?Dir(App.Path??"\*.txt")?'第一次用帶有通配符的參數(shù)

Do?Until?file?=?""

FileCopy?App.Path??"\"??file,?App.Path??"\Save\"??file

Kill?App.Path??"\"??file

file=dir()?'接下去不需要參數(shù)

Loop

End?Sub

VB中Dir函數(shù)的意思

Dir Function Returns a String representing the name of a file, directory, or folder that matches a specified pattern or file attribute, or the volume label of a drive.以上解釋來自MSDN,意思是,dir函數(shù)返回一個(gè)代表有特定屬性的文件名,目錄名,或者一個(gè)文件夾名的字符串. 一般用來檢測(cè)是否存在某文件或文件夾. 這是一個(gè)例子This example uses the Dir function to check if certain files and directories exist. Dim MyFile, MyPath, MyName ' Returns "WIN.INI" if it exists. MyFile = Dir("C:\WINDOWS\WIN.INI") 不明白請(qǐng)追問

vb dir函數(shù)

;???Dim?FileName?As?String

Dim?AppPath??As?String

AppPath?=?IIf(Right$(App.Path,?1)?=?"\",?App.Path,?App.Path??"\")

FileName?=?AppPath??"數(shù)據(jù)\計(jì)算表.xls"

'如果你的程序放在盤符的根目錄，比如放在D盤

'你直接用?App.Path??"\數(shù)據(jù)\"??"計(jì)算表.xls"

'得到的是?D:\\數(shù)據(jù)\計(jì)算表.xls

'所以要判斷一下

'如果你能保證程序不在盤符下，則可以不用這樣處理

If?Dir(FileName)?=?""?Then

MsgBox?"表已不存在。"

Combo1?=?""

Exit?Sub

End?If

dir()在VB中是表示什么

樓上說的都對(duì)，但是只說了語法，沒說用途，需要強(qiáng)調(diào)的是，Dir函數(shù)在VB中最主要的用途是確定文件是否存在，不存在就返回空字符串，例如

if dir("c:\1.txt")="" then '如果c:\1.txt不存在，那么...

vb中Dir函數(shù)怎么用

If Dir("C:\test.xls") "" then

MsgBox "文件存在" '當(dāng)C盤根目錄存在test.xls文件時(shí)提示“文件存在”

else

MsgBox "文件不存在"

End If

--------------------------------------------------------------------------------

Dir函數(shù)

返回一個(gè) String，用以表示一個(gè)文件名、目錄名或文件夾名稱，它必須與指定的模式或文件屬性、或磁盤卷標(biāo)相匹配。

語法

Dir[(pathname[, attributes])]

Dir 函數(shù)的語法具有以下幾個(gè)部分：

部分 描述

pathname 可選參數(shù)。用來指定文件名的字符串表達(dá)式，可能包含目錄或文件夾、以及驅(qū)動(dòng)器。如果沒有找到 pathname，則會(huì)返回零長度字符串 ("")。

attributes 可選參數(shù)。常數(shù)或數(shù)值表達(dá)式，其總和用來指定文件屬性。如果省略，則會(huì)返回匹配 pathname 但不包含屬性的文件。

設(shè)置值

attributes 參數(shù)的設(shè)置可為：

常數(shù) 值 描述

vbNormal 0 (缺省) 指定沒有屬性的文件。

vbReadOnly 1 指定無屬性的只讀文件

vbHidden 2 指定無屬性的隱藏文件

VbSystem 4 指定無屬性的系統(tǒng)文件

vbVolume 8 指定卷標(biāo)文件；如果指定了其它屬性，則忽略vbVolume

vbDirectory 16 指定無屬性文件及其路徑和文件夾。

注意 這些常數(shù)是由 VBA 所指定的，在程序代碼中的任何位置，可以使用這些常數(shù)來替換真正的數(shù)值。

說明

Dir 支持多字符 (*) 和單字符 (?) 的通配符來指定多重文件。

由于 Macintosh 不支持通配符，使用文件類型指定文件組?？梢允褂?MacID 函數(shù)指定文件類型而不用文件名。比如，下列語句返回當(dāng)前文件夾中第一個(gè)TEXT文件的名稱:

Dir("SomePath", MacID("TEXT"))

為選中文件夾中所有文件，指定一空串:

Dir("")

在 Microsoft Windows 中，如果在Dir函數(shù)中使用MacID函數(shù)，將產(chǎn)生錯(cuò)誤。

任何大于256的attribute值都被認(rèn)為是MacID 函數(shù)的值。

在第一次調(diào)用 Dir 函數(shù)時(shí)，必須指定 pathname，否則會(huì)產(chǎn)生錯(cuò)誤。如果也指定了文件屬性，那么就必須包括 pathname。

Dir 會(huì)返回匹配 pathname 的第一個(gè)文件名。若想得到其它匹配 pathname 的文件名，再一次調(diào)用 Dir，且不要使用參數(shù)。如果已沒有合乎條件的文件，則 Dir 會(huì)返回一個(gè)零長度字符串 ("")。一旦返回值為零長度字符串，并要再次調(diào)用 Dir 時(shí)，就必須指定 pathname，否則會(huì)產(chǎn)生錯(cuò)誤。不必訪問到所有匹配當(dāng)前 pathname 的文件名，就可以改變到一個(gè)新的 pathname 上。但是，不能以遞歸方式來調(diào)用 Dir 函數(shù)。以 vbDirectory 屬性來調(diào)用 Dir 不能連續(xù)地返回子目錄。

提示 由于文件名并不會(huì)以特別的次序來返回，所以可以將文件名存儲(chǔ)在一個(gè)數(shù)組中，然后再對(duì)這個(gè)數(shù)組排序。