用Directory.CreateDirectory即可創(chuàng)建文件夾:
創(chuàng)新互聯(lián)建站服務(wù)項目包括道里網(wǎng)站建設(shè)、道里網(wǎng)站制作、道里網(wǎng)頁制作以及道里網(wǎng)絡(luò)營銷策劃等。多年來,我們專注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢、行業(yè)經(jīng)驗、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,道里網(wǎng)站推廣取得了明顯的社會效益與經(jīng)濟效益。目前,我們服務(wù)的客戶以成都為中心已經(jīng)輻射到道里省份的部分城市,未來相信會繼續(xù)擴大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任!
'?建立目錄
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)建成功")
Imports?System.IO
Imports?System.Diagnostics
Imports?System.Windows.Forms
Class?Form1
Inherits?Form
Private?filename?As?String?=?"abc.bat"
Private?bat?As?String?=?"@echo?off"??vbCr??vbLf??"dir"??vbCr??vbLf??"pause"??vbCr??vbLf??"exit"??vbCr??vbLf
Private?Sub?New()
Dim?btn?As?New?Button()
btn.Parent?=?Me
btn.Text?=?"Run?bat"
AddHandler?btn.Click,?Sub()?Process.Start(filename)
End?Sub
Protected?Overrides?Sub?OnLoad(e?As?EventArgs)
File.WriteAllText(filename,?bat)
MyBase.OnLoad(e)
End?Sub
Protected?Overrides?Sub?OnClosed(e?As?EventArgs)
File.Delete(filename)
MyBase.OnClosed(e)
End?Sub
STAThread?_
Public?Shared?Sub?Main()
Application.Run(New?Form1())
End?Sub
End?Class
這個線程對象一定有個完成時或者進行中的動作,你可以用AddHandler語句來將過程委托給ProcessChanged或者ProcessConpleted動作。
.Net Core是微軟發(fā)布的下一代開發(fā)平臺,是一個用來構(gòu)建現(xiàn)代化的、可伸縮的和高性能的,可以跨平臺的應(yīng)用軟件通用開發(fā)框架。和.Net
Framework相比具有良好的跨平臺特性和更優(yōu)異的性能,除了可以在Windows平臺上運行外還支持Linux和MacOS平臺。
在.Net Core的早期版本尚不支持開發(fā)桌面應(yīng)用程序。如果我們想用C#開發(fā)桌面應(yīng)用程序的話只能使用.Net
Framework或者MONO平臺。不過自9月23日微軟正式發(fā)布.Net Core 3.0起,我們也可以基于.Net Core來開發(fā)桌面應(yīng)用程序了。
VS2019 16.3
微軟的桌面應(yīng)用程序開發(fā)技術(shù)主要有WinForms和WPF兩種。這兩種技術(shù)現(xiàn)在.Net Core
3.0都支持,不過它們只能在Windows平臺上運行。如果想用C#開發(fā)跨平臺的桌面應(yīng)用只能選擇MONO了。
開發(fā)基于.Net Core 3.0平臺的桌面應(yīng)用程序必須要安裝Visual Studio 2019 16.3或更高的版本,可以直接使用Visual
Studio Installer在線升級。目前官網(wǎng)上可以升級的最新版本是16.3.1。
圖一 VS2019 16.3.1
不過目前的VS2019中還沒有集成Windows
Forms圖形設(shè)計器,需要的話得從單獨下載安裝。
創(chuàng)建WinForms程序
雙擊打開Visual Studio 2019,選擇“創(chuàng)建新項目”,參見下圖所示。
圖二 創(chuàng)建新項目
然后在項目模板中選擇“Windows Forms App(.NET Core)”,注意這里使用的框架是.Net
Core了,而不是之前我們一直使用的.Net Framework。當(dāng)然在VS2019中我們依然可以使用.Net Framework來開發(fā)桌面應(yī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
文件夾。
多線程操控同一個空間容易出現(xiàn)混亂,可通過SyncLock語句,將對空間的操作添加至lock語句內(nèi)部,
Class?simpleMessageList
Public?messagesList()?As?String?=?New?String(50)?{}
Public?messagesLast?As?Integer?=?-1
Private?messagesLock?As?New?Object
Public?Sub?addAnotherMessage(ByVal?newMessage?As?String)
SyncLock?messagesLock
messagesLast?+=?1
If?messagesLast??messagesList.Length?Then
messagesList(messagesLast)?=?newMessage
End?If
End?SyncLock
End?Sub
End?Class
參考:
分享名稱:vb.net創(chuàng)建任務(wù),vb創(chuàng)建工程
文章轉(zhuǎn)載:http://muchs.cn/article28/hcijcp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供靜態(tài)網(wǎng)站、企業(yè)網(wǎng)站制作、微信公眾號、企業(yè)建站、Google、品牌網(wǎng)站設(shè)計
聲明:本網(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)