如何打開(kāi)指定路徑下的文件 VB.NET (路徑已經(jīng)知道）

Path：是初始目錄的路徑

創(chuàng)新互聯(lián)專業(yè)為企業(yè)提供永清網(wǎng)站建設(shè)、永清做網(wǎng)站、永清網(wǎng)站設(shè)計(jì)、永清網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁(yè)設(shè)計(jì)與制作、永清企業(yè)網(wǎng)站模板建站服務(wù)，10余年永清做網(wǎng)站經(jīng)驗(yàn)，不只是建網(wǎng)站，更提供有價(jià)值的思路和整體網(wǎng)絡(luò)服務(wù)。

Private Sub WriteArray(ByVal Path As String)

'寫(xiě)入數(shù)組代碼在這里，直接將Path寫(xiě)到數(shù)組就行了。

Dim dir As New IO.DirectoryInfo(Path)

For Each d As IO.DirectoryInfo In dir.GetDirectories

WriteArray(d.FullName) '遞歸

Next

End Sub

如果子目錄較多那么遞歸會(huì)比較費(fèi)時(shí)間，在調(diào)用遞歸前加入application.doevent就行了，這樣在應(yīng)對(duì)大遞歸時(shí)不會(huì)死機(jī)。

至于數(shù)組嘛使用 arraylist 最好了。

回答補(bǔ)充：

把遞歸去掉就行了啊！

如何用vb.net打開(kāi)指定的EXCEL文件并在SHEET1的A1建立超鏈接指向sheet2的B2

Dim xx As New Microsoft.Office.Interop.Excel.Application '定義進(jìn)程

Dim yy As Microsoft.Office.Interop.Excel.Workbook '定義工作簿

xx = CreateObject("Excel.Application") '創(chuàng)建Excel對(duì)象

yy = xx.Workbooks("sheet1")

yy.Worksheets("sheet1").range("A1")="sheet2!b2"

yy.Save()

yy.Close()

yy = Nothing

xx.Quit()

xx = Nothing '銷毀組建釋放資源

vb.net datagridview 點(diǎn)擊單元格打開(kāi)指定的文件

可以用cellclick或者cellContentClick事件，然后打開(kāi)一個(gè)選擇文件的對(duì)話框，接著你想取這個(gè)文件的文件名，或者文件大小都可以取到了

VB.net中 單擊一個(gè)按鈕，打開(kāi)已知目錄的某個(gè)文件，如何通過(guò)代碼實(shí)現(xiàn)

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

Process.Start("C:\1.txt")

End Sub

如何用vb.net 打開(kāi)一個(gè)既存的txt文檔。

可以調(diào)用CMD

方法一：

Shell("cmd.exe?/c?call?c:\新建文本文檔.txt",?AppWinStyle.NormalFocus)

缺點(diǎn)：不但會(huì)打開(kāi)文本文件，同時(shí)還會(huì)顯示一個(gè)cmd窗體。

方法二：

需要新建一個(gè)bat文件到資源里，輸入start C:\新建文本文檔.txt

代碼

shell?"bat文件的路徑.bat"

這樣就好了，兩種方法各有好壞。一個(gè)會(huì)顯示cmd窗體，一個(gè)需要bat文件。

本文名稱：vb.net打開(kāi)制定文件,怎么使用vbs打開(kāi)并編輯文件
標(biāo)題來(lái)源：http://chinadenli.net/article1/dsecgid.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供小程序開(kāi)發(fā)、云服務(wù)器、微信小程序、做網(wǎng)站、網(wǎng)站建設(shè)、建站公司

廣告

聲明：本網(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í)需注明來(lái)源： 創(chuàng)新互聯(lián)