vb.net如何新建文件,如何創建vbs后綴的文件

VB.Net怎么創建文件

舉個例子：

公司主營業務：做網站、網站設計、移動網站開發等業務。幫助企業客戶真正實現互聯網宣傳，提高企業的競爭能力。成都創新互聯是一支青春激揚、勤奮敬業、活力青春激揚、勤奮敬業、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴謹、自律”為核心的企業文化，感謝他們對我們的高要求，感謝他們從不同領域給我們帶來的挑戰，讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。成都創新互聯推出韓城免費做網站回饋大家。

先引入命名空間：

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:\

創建

test

文件夾。

vb.net如何在D盤新建一個test.ini文件呢？

'創建一個文本文件,把文本框里的文字寫入到該文件，當然，你可以使用一個字符串變量

Dim MyStream As New System.IO.FileStream("D:\test.ini", System.IO.FileMode.Create)

Dim MyWriter As New System.IO.StreamWriter(MyStream, System.Text.Encoding.Default)

MyWriter.WriteLine(TextBox1.Text)

MyWriter.Flush()

MyWriter.Close()

MyStream.Close()

VB.NET 創建文件夾

用Directory.CreateDirectory即可創建文件夾：

'?建立目錄

If?Not?Directory.Exists("C:\負屃\"??TextBox1.Text)?Then?'檢查文件夾是否存在

Directory.CreateDirectory("C:\負屃\"??TextBox1.Text)??'不存在，創建文件建夾

End?If

你的例子是因為少了一個"\"引起的，正確的如下：

Dim?fsotest?As?New?FileSystemObject

If?fsotest.FileExists("C:\負屃\"??TextBox1.Text)?=?False?Then

fsotest.CreateFolder("C:\負屃\"??TextBox1.Text) '這里你少了一個\

End?If

MsgBox("創建成功")

網站標題：vb.net如何新建文件,如何創建vbs后綴的文件
文章鏈接：http://m.kartarina.com/article30/hegsso.html

成都網站建設公司_創新互聯，為您提供App開發、網站策劃、小程序開發、移動網站建設、關鍵詞優化、域名注冊

廣告

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