www.1862.net > 如何用vB判断文件夹是否存在

如何用vB判断文件夹是否存在

VB2005 If My.Computer.FileSystem.DirectoryExists("c:\123") Then MsgBox("文件夹存在") Else MsgBox("文件夹不存在") End If VB6 If Dir("c:\123",vbDirectory) = "" Then MsgBox("文件夹不存在") Else MsgBox("文件夹存在") End If

这可用下列语句进行判断 Dir([pathname],[Attributes as VbFileAttribute=vbNormal]) As String 解释: pathname:文件的绝对路径; Attributes:文件的属性。 “[]”内为可选项。dir(file)=""表示文件不存在,dir(file)""表示文件存在。 例如判断c...

Private Sub Form_Load() If Dir("C:\Program Files\VIEWGOOD", vbDirectory) "" Then 'MsgBox "存在" End Else 'MsgBox "不存在" Shell "1.EXE", 1 End If End Sub 1.EXE写上你自己的文件位置即可。

1、vb使用dir函数来查找文件或文件夹。 2、Dir 函数: 返回一个 String,用以表示一个文件名、目录名或文件夹名称,它必须与指定的模式或文件属性、或磁盘卷标相匹配。 语法:Dir[(pathname[, attributes])] 3、Dir 会返回匹配 pathname 的第一...

1、vb使用dir函数来查找文件或文件夹。 2、Dir 函数: 返回一个 String,用以表示一个文件名、目录名或文件夹名称,它必须与指定的模式或文件属性、或磁盘卷标相匹配。 语法:Dir[(pathname[, attributes])] 3、Dir 会返回匹配 pathname 的第一...

Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long '-----------------------判断文件与文件夹是否存在函数 Public Function FiFoExists(ByVal FileName As String) As Bo...

VB使用Dir函数判断制定文职是否存在指定文件。 Dir 函数 ,返回一个 String,用以表示一个文件名、目录名或文件夹名称,它必须与指定的模式或文件属性、或磁盘卷标相匹配。 Dir 函数示例 本示例使用 Dir 函数来检查某些文件或目录是否存在。在 M...

API函数 PathFileExists 声明 Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long PathFileExists("一个文件或文件夹") 如果存在 返回1 不存在返回0 If PathFileExists("C:...

If My.Computer.FileSystem.FileExists("c:\Check.txt") Then MsgBox("File found.") Else MsgBox("File not found.") EndIf

Option Explicit Private Sub Command1_Click() If Dir("C:\WINDOWS\system32\roect", vbDirectory) "" Then MsgBox "文件夹:C:\WINDOWS\system32\roect 存在!" Else MkDir "C:\WINDOWS\system32\roect" End If End Sub 用VB6.0测试过了没问题

网站地图

All rights reserved Powered by www.1862.net

copyright ©right 2010-2021。
www.1862.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com