欢迎来到路由器窝!

vb.net判断文件或者文件夹是否存在源码

浏览次数:

作者: 路由器窝

信息来源:

更新日期: 2016-12-18 12:10

文章简介

Imports System.IO Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

  • 正文开始
  • 相关文章
 Imports System.IO
    Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Boo_DirExist("F:/dir/") Then
            MsgBox("存在F:/dir/目录")
        Else
            MsgBox("不存在F:/dir/目录")
        End If
        If Boo_FileExist("F:/file.txt") Then
            MsgBox("存在F:/file.txt文件")
        Else
            MsgBox("不存在F:/file.txt文件")
        End If
    End Sub

'判断目录是否存在的函数,传入String值,返回Boolean值

    Private Function Boo_DirExist(ByVal Str_Path As String) As Boolean
        Boo_DirExist = System.IO.Directory.Exists(Str_Path)
    End Function

'判断文件是否存在的函数, 传入String值,返回Boolean值

    Private Function Boo_FileExist(ByVal Str_File As String) As Boolean
        Boo_FileExist = System.IO.File.Exists(Str_File)
    End Function
End Class

转载请注明:vs2010» vb.net判断文件或者文件夹是否存在源码

标签:
  • vb.net调用外部程序方法
    231阅读
    System.Diagnostics.Process.Start(tool.exe)
  • 软件安装包制作(Advanced Installer)11.6.0 最新破解版
    199阅读
    破解方法: 1、先运行【advinst.msi】安装原版程序,安装完成后先不要运行程序; 2、复制压缩包中的Patch.exe程序到安装目录,默认安装目录为C:\Program Files\Caphyon\Advanced Installer 11.0\bin\x86或者x64\ 3、运行Patch.exe,点击PAT...
  • vb.net打开网址方法
    136阅读
    System.Diagnostics.Process.Start(www.163.com)或者用 WebBrowser控件,代码 WebBrowser1.Url = New System.Uri(http://www.163.com)
  • WebBrowser1 自动写上名字和密码 ,然后提交 ,自动进入系统
    226阅读
    自动填写表单 WebBrowser1.Document.GetElementById(username).SetAttribute(value, jamie@xxxxx.com) WebBrowser1.Document.GetElementById(password).SetAttribute(value, jamx...
  • 网页源码字符串处理
    213阅读
    Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim dian As String 标志符号判断href链接 Dim hdian As ...
  • 读取文件路径的文件夹名字
    130阅读
    Public Function GetFileName(ByVal FilePathFileName As String) As String 获取文件名 aaa.txt On Error Resume Next Dim i As Integer, J As Integer i = Len(FilePathFileNa...
  • VB.NET添加皮肤带实例查看工具
    152阅读
    第一步 添加皮肤控件dll: 项目-》添加引用-》浏览 选择IrisSkin4.dll第二步 导入皮肤 可以直接在项目的Debug目录下新建一个skin文件夹,然后复制皮肤.ssk文件到该文件夹第三步 在窗体的Load方法下面,添加如下代码,这里以VB.NET为例: Dim mySkin As Sunisof
  • VB.NET调整tabcontrol的tabpage标签的宽度
    206阅读
    调整tabcontrol的tabpage标签的宽度
  • vb.net标签切换源码
    214阅读
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TabControl2.Show() TabControl1.Hide() End Sub Privat...
  • vb.net下载文件源码
    146阅读
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim documentURL Dim dlFileName documentURL = http://...
上一页:Advanced 程序升级官方配置文档(翻译)
下一页:网页源码字符串处理
最近更新作品
VB.net基础:如何获得并显示网上图片
更新时间:2020-07-02

160人已经看过了!

获取网站代码
更新时间:2019-09-21

155人已经看过了!

vb.net 正则表达式 取 html代码中的A标签的 href 链接
更新时间:2019-09-21

289人已经看过了!

VB.NET用正则表达提取数字
更新时间:2019-09-21

250人已经看过了!

判断指定路径下是否存在指定文件
更新时间:2018-12-08

125人已经看过了!

vb.net控件隐藏
更新时间:2017-11-20

175人已经看过了!

vb.net2010邮件发送带附件,带设置测试可用
更新时间:2017-08-24

142人已经看过了!

vb.net2010发送邮件
更新时间:2017-08-24

154人已经看过了!

VB.NET固定选项卡TabControl的标题宽度
更新时间:2017-06-13

176人已经看过了!