VB.Net怎么創(chuàng)建文件

舉個例子：

創(chuàng)新互聯(lián)公司專注于成都網(wǎng)站設(shè)計(jì)、網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計(jì)、網(wǎng)站制作、網(wǎng)站開發(fā)。公司秉持“客戶至上,用心服務(wù)”的宗旨,從客戶的利益和觀點(diǎn)出發(fā),讓客戶在網(wǎng)絡(luò)營銷中找到自己的駐足之地。尊重和關(guān)懷每一位客戶，用嚴(yán)謹(jǐn)?shù)膽B(tài)度對待客戶，用專業(yè)的服務(wù)創(chuàng)造價值，成為客戶值得信賴的朋友，為客戶解除后顧之憂。

先引入命名空間：

Imports

System.IOImports

System.Security.AccessControl

代碼：

Dim

sec

As

DirectorySecurity

=

New

DirectorySecurityDim

rule

As

FileSystemAccessRule

=

New

FileSystemAccessRule("Administrator",

FileSystemRights.Delete,

AccessControlType.Allow)sec.AddAccessRule(rule)Directory.CreateDirectory("C:\test",

sec)

這段代碼就是以

Administrator

帳戶

在

C:\

創(chuàng)建

test

文件夾。

vb.net 二進(jìn)制讀取文件

VB.NET打開二進(jìn)制文件用fileopen完成，打開二進(jìn)制文件的形式為：openmode.binary

讀取二進(jìn)制文件用的是fileget方法，寫入二進(jìn)制文件用的是fileput方法。

應(yīng)用示例：將一批隨機(jī)數(shù)保存在一個dat文件中，然后再將其提取到文本框中。

二進(jìn)制文件的讀寫一批隨機(jī)數(shù)的存取，程序?yàn)椋?/p>

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim x, i, fn As Integer

Dim s As String = ""

fn = FreeFile()

FileOpen(fn, "d:\data.dat", OpenMode.Binary)

For i = 1 To 8

x = Int(Rnd() * 100)

s = s + Str(x)

FilePut(fn, x)

Next

FileClose(fn)

TextBox1.Text = s

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim x, fn As Integer

Dim s As String = ""

fn = FreeFile()

FileOpen(fn, "d:\data.dat", OpenMode.Binary)

Do While Not EOF(fn)

FileGet(fn, x)

s = s + Str(x) + " "

Loop

FileClose(fn)

TextBox1.Text = s

End Sub

如何使用VB．NET FileInfo類對文件操作

在網(wǎng)上收到一些關(guān)于文件操作的列子，現(xiàn)在和大家分享一下，以下的示例代碼將向您展示如何使用VB．NET FileInfo來拷貝、移動和刪除文件，以及如何使用DirectoryInfo來移動和刪除文件夾。（注意：為了運(yùn)行這些示例，您需要將這條語句：Imports System．IO，添加到您的表單或模塊的最頂部。）

VB．NET FileInfo示例 拷貝一個文件 1. Dim fFile1 As New FileInfo（"C：abc1．txt"）2.3. fFile1．CopyTo（"C：abc2．txt"， True）4. 我們將fFile1變量定義為一個FileInfo對象并設(shè)定它指向文件系統(tǒng)中的一個目錄，為了拷貝一個文件，我們使用FileInfo對象中的CopyTo方法并指明我們計(jì)劃要拷貝的目標(biāo)文件的全名。 移動一個文件 1. Dim fFile1 As New FileInfo（"C：abc1．txt"）2.3. fFile1．MoveTo（"C：abc3．txt"）4. 我們將fFile1變量定義為一個FileInfo對象并設(shè)定它指向文件系統(tǒng)中的一個目錄，為了拷貝一個文件，我們使用FileInfo對象中的CopyTo方法并指明我們計(jì)劃要移動的目標(biāo)文件的全名。 刪除一個文件 1. Dim fFile1 As New FileInfo（"C：abc1．txt"）2.3. fFile1．Delete（）4. 我們將fFile1變量定義為一個FileInfo對象并設(shè)定它指向文件系統(tǒng)中的一個目錄，為了刪除一個文件，我們使用FileInfo對象中的Delete方法。 VB．NET FileInfo DirectoryInfo示例 移動一個文件夾 1. Dim dDir1 As New DirectoryInfo（"C：Folder1"）2.3. dDir1．MoveTo（"C：Folder2"）4. 我們將dDir1變量定義為一個DirectoryInfo對象并設(shè)定它指向文件系統(tǒng)中的一個目錄，為了移動一個文件夾，我們使用DirectoryInfo對象的MoveTo方法，并指明我們所移動的文件夾的完整目標(biāo)路徑。 刪除一個文件夾 1. Dim dDir1 As New DirectoryInfo（"C：Folder1"）2.3. dDir1．Delete（）4. 我們將dDir1變量定義為一個DirectoryInfo對象并設(shè)定它指向文件系統(tǒng)中的一個目錄，為了刪除一個文件夾，我們使用DirectoryInfo對象的Delete方法。） 作者：未知 來源：網(wǎng)絡(luò)

VB.net怎樣保存文件

保存文件的步驟為：

關(guān)閉流，特別是寫入流

關(guān)閉并保存文件

示例代碼如下：

Imports?System.Windows.Forms

Imports?System.IO

Imports?System.Text

Sub?SaveFileDemo()

'打開文件。如果文件不存在則創(chuàng)建新的文件

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("白刃格斗英雄連英模部隊(duì)方隊(duì)亮相閱兵")

'關(guān)閉流

tw.Close()

'關(guān)閉文件并保存文件

myFile.Close()

End?Sub

VB.NET使用fileput寫入數(shù)據(jù)時,如何避免刪除文件中已有的內(nèi)容

用System.IO.File中的靜態(tài)函數(shù)AppendText獲得一個StreamWriter，然后用Write或WriteLine函數(shù)寫入一些字符串，最后寫入流并關(guān)閉它。

Dim sw As StreamWriter = System.IO.File.AppendText("textfile.txt")

Using sw

sw.Write("This is ") '僅寫入字符串

sw.WriteLine("line 1.") '寫入字符串并自動寫入換行符

sw.Flush() '寫入流

End Using '這里釋放了資源

vb.net d盤有個文件夾file里面有excel類型文件怎么用getfile取到文件的路徑

你好，請使用System.IO.Directory.EnumerateFiles()方法

Dim?XLS文件列表?As?IEnumerable(Of?string)

Dim?XLSX文件列表?As?IEnumerable(Of?string)

Dim?path?As?String?=?"D:\File\"

XLS文件列表?=?Directory.EnumerateFiles(path,?"*.xls",?SearchOption.TopDirectoryOnly)

XLSX文件列表?=?Directory.EnumerateFiles(path,?"*.xlsx",?SearchOption.TopDirectoryOnly)

分享文章：關(guān)于vb.netfile的信息
網(wǎng)頁URL：http://jinyejixie.com/article6/hsejig.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供、企業(yè)網(wǎng)站制作、App開發(fā)、網(wǎng)站營銷、響應(yīng)式網(wǎng)站、靜態(tài)網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)