vb.net使用控件FolderBrowserDialog1,在程序中:
網(wǎng)站的建設(shè)成都創(chuàng)新互聯(lián)公司專注網(wǎng)站定制,經(jīng)驗(yàn)豐富,不做模板,主營網(wǎng)站定制開發(fā).小程序定制開發(fā),H5頁面制作!給你煥然一新的設(shè)計(jì)體驗(yàn)!已為不銹鋼雕塑等企業(yè)提供專業(yè)服務(wù)。
'設(shè)置對(duì)話框中在樹視圖控件上顯示的說明文本
Me.FolderBrowserDialog1.Description = "請(qǐng)選擇輸出報(bào)表所在路徑:"
'設(shè)置從其開始瀏覽的根文件夾
Me.FolderBrowserDialog1.SelectedPath = "c:\"
If Me.FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
'取得全路徑(包含文件名)
reportPath1 = System.IO.Path.GetFullPath(Me.FolderBrowserDialog1.SelectedPath)
'設(shè)定text顯示文件名
txtReport1.Text = reportPath1
setReportList()
End If
在setReportList()中針對(duì)你所需要的文件進(jìn)行操作等
給你一個(gè)遍歷所有盤符下的文件夾的例子
加一個(gè)遍歷文件的就可以了。
TreeNode node = new TreeNode("我的電腦");
treeView.Nodes.Add(node); //加入一個(gè)我的電腦節(jié)點(diǎn)
string[] drivesName = System.IO.Directory.GetLogicalDrives() //取得驅(qū)動(dòng)器列表的集合
foreach(string name in drivesName) //用foreach遍歷集合
{
TreeNode drivesNode = new TreeNode(name);
node.Nodes.Add(drivesNode); //加到我的電腦節(jié)點(diǎn)下
新建立個(gè)窗體,放入文件夾控件等,然后點(diǎn)確定返回一個(gè)字符串即可。
選擇文件或者選擇文件夾時(shí),顯示這個(gè)窗體,然后取這個(gè)字符串。
選擇文件夾??在工具箱?-?對(duì)話框?里選擇?FolderBrowserDialog?添加?到設(shè)計(jì)器中
然后?代碼寫在??按鈕事件里
FolderBrowserDialog1.ShowDialog()
textbox1.text?=FolderBrowserDialog1.SelectedPath
選擇文件?在工具箱?-?對(duì)話框?里選擇?OpenFileDialog
把?OpenFileDialog1.ShowDialog()
TextBox1.Text?=?OpenFileDialog1.FileName
寫到按鈕事件下
如圖
點(diǎn)擊按鈕會(huì)彈出?通用對(duì)話框??選擇好路徑后?確定?,編輯框里就會(huì)顯示選擇的路徑
Using?FolderBrowserDialog?As?New?FolderBrowserDialog
If?FolderBrowserDialog.ShowDialog?=?Windows.Forms.DialogResult.OK?Then
Dim?資料夾?As?String()?=?System.IO.Directory.GetFiles(FolderBrowserDialog.SelectedPath,?"*")
For?Each?文件?In?資料夾
MsgBox(My.Computer.FileSystem.ReadAllText(文件))?'讀取數(shù)據(jù)
My.Computer.FileSystem.WriteAllText(文件,?"數(shù)據(jù)",?False)?'寫入數(shù)據(jù)
Next
End?If
End?Using
分享題目:vbnet選擇文件夾,vbnet讀取文件內(nèi)容
分享路徑:http://m.kartarina.com/article48/hddohp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供App設(shè)計(jì)、營銷型網(wǎng)站建設(shè)、搜索引擎優(yōu)化、網(wǎng)頁設(shè)計(jì)公司、網(wǎng)站導(dǎo)航、靜態(tài)網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)