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

舉個例子：

公司主營業(yè)務(wù)：做網(wǎng)站、網(wǎng)站設(shè)計、移動網(wǎng)站開發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實現(xiàn)互聯(lián)網(wǎng)宣傳，提高企業(yè)的競爭能力。成都創(chuàng)新互聯(lián)是一支青春激揚、勤奮敬業(yè)、活力青春激揚、勤奮敬業(yè)、活力澎湃、和諧高效的團(tuán)隊。公司秉承以“開放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化，感謝他們對我們的高要求，感謝他們從不同領(lǐng)域給我們帶來的挑戰(zhàn)，讓我們激情的團(tuán)隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。成都創(chuàng)新互聯(lián)推出韓城免費做網(wǎ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如何在D盤新建一個test.ini文件呢？

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

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 創(chuàng)建文件夾

用Directory.CreateDirectory即可創(chuàng)建文件夾：

'?建立目錄

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

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

End?If

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

Dim?fsotest?As?New?FileSystemObject

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

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

End?If

MsgBox("創(chuàng)建成功")

網(wǎng)站標(biāo)題：vb.net如何新建文件,如何創(chuàng)建vbs后綴的文件
文章鏈接：http://chinadenli.net/article30/hegsso.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供App開發(fā)、網(wǎng)站策劃、小程序開發(fā)、移動網(wǎng)站建設(shè)、關(guān)鍵詞優(yōu)化、域名注冊

廣告

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