VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > vb >

  • vb.net 教程 4-5 文件操作 File 2

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
继续上一节的学习。
 
 
 
创建一个空文件：
 
    Private Sub btnCreateFile_Click(sender As Object, e As EventArgs) Handles btnCreateFile.Click
        If File.Exists("d:\bb.jpg") Then
            txtFileInfo.Text = "该文件已经存在"
        Else
            File.Create("d:\bb.jpg")
            txtFileInfo.Text = "创建文件成功"
        End If
    End Sub
删除文件：
 
    Private Sub btnDelFile_Click(sender As Object, e As EventArgs) Handles btnDelFile.Click
        If File.Exists("d:\bb.jpg") Then
            Try
                File.Delete("d:\bb.jpg")
                txtFileInfo.Text = "该文件已经删除"
            Catch ex As Exception
                txtFileInfo.Text = "删除文件时发生错误：" & ex.Message
            End Try
 
        Else
            txtFileInfo.Text = "该文件不存在"
        End If
    End Sub
 
移动文件：
 
    Private Sub btnMoveFile_Click(sender As Object, e As EventArgs) Handles btnMoveFile.Click
        If File.Exists("d:\bb.jpg") Then
            Try
                File.Move("d:\bb.jpg", "e:\bb.jpg")
                txtFileInfo.Text = "文件已经移动"
            Catch ex As Exception
                txtFileInfo.Text = "移动文件时发生错误，" & ex.Message
            End Try
        Else
            txtFileInfo.Text = "文件不存在"
        End If
    End Sub
 
 
学习更多vb.net知识，请参看 vb.net 教程 目录
————————————————
版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。
原文链接：https://blog.csdn.net/uruseibest/article/details/74937016

相关教程