新聞中心
文件操作是每個(gè)軟件必備的功能,利用常用VB.NET控件就可以輕松操作文件,這里就為你介紹怎樣才能更好的利用VB.NET控件操作文件。

網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)建站!專注于網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、小程序制作、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了張灣免費(fèi)建站歡迎大家使用!
顯示文件
因?yàn)椴煌募拇鎯?chǔ)格式的差異,所以,只有用適當(dāng)?shù)姆椒ú拍苷_的顯示不同的文件。表現(xiàn)在表層,也就是不同的文件后綴名不同,而且不同的應(yīng)用軟件只能讀取和顯示某種或幾種不同格式的文件。如:以.DOC為后綴名的文件,用WORD就可以打開(kāi),但是用記事本就無(wú)法正確顯示.所以,VB中就給我們提供了不同的控件來(lái)顯示不同的文件。
在此我們以text控件為例子,看一看用它是怎樣顯示文件的。
- Private Sub mnuopen_Click() ’當(dāng)點(diǎn)擊菜單中的打開(kāi)文件時(shí)執(zhí)行
- Dim filepath as Sting
- Dim strLine As String
- '在未選擇文件時(shí),text.text為空字符,,不顯示任何內(nèi)容
- text1.text = “”
- CommonDialog1.FileName = ""
- '下面語(yǔ)句設(shè)置文件過(guò)濾方式,可顯示擴(kuò)展名為txt文件
- CommonDialog1.Filter = "(*.txt)|*.txt"
- '建立打開(kāi)方式的通用對(duì)話框,也可使用commondialog1.showopen
- CommonDialog1.Action = 1
- filepath=CommonDialog1.FileName ‘得到選擇的文件
- Open filepath For Input As #1 打開(kāi)選擇的文件
- Do Until EOF(1) ‘顯示打開(kāi)的文件
- Line Input #1, strLine
- text1text1.Text = text1.Text + strLine + Chr(13) + Chr(10)
- Loop
- Close #1 ‘關(guān)閉打開(kāi)的文件
- End Sub
除了VB.NET控件自帶的外,我們還可以使用fileSystemObject文件系統(tǒng)對(duì)象,file對(duì)象,以及files集合。下面我們給出兩個(gè)例子,更多更詳細(xì)的內(nèi)容請(qǐng)參考前面目錄部分。
下面代碼舉例說(shuō)明了如何獲得一個(gè)file對(duì)象,以及如何察看它的一個(gè)屬性。
- Sub ShowFileInfo(filespec)
- Dim fs, f, s
- Set fs = CreateObject("scripting.FileSystemObject")
- Set f = fs.GetFile(filespec)
- s = f.DateCreated
- MsgBox s
文件操作是每個(gè)軟件必備的功能,利用Visual Basic提供的常用控件就可以輕松操作文件End Sub
對(duì)于如何獲得一個(gè)files集合,以及如何用For Each……Next語(yǔ)句來(lái)訪問(wèn)這個(gè)集合中的每個(gè)file,我們可以參考下面的例子:
- Sub ShowFolderList( folderspec ) ‘folderspec 為文件夾名稱
- Dim fs , f, f1,fc , s
- Set fs = CreateObject(“Scripting.FileSystemObject”)
- Set f = fs.GetFolder(folderspec) ‘得到folderspec文件夾相關(guān)的folder對(duì)象
- Set ffc = f.Files ‘得到folder對(duì)象所包含的文件夾的files集合
- For Each fi in fc ‘訪問(wèn)folder集合中的每一個(gè)folder
- ss= s & f1.name ‘格式化要顯示的文本
- ss= s & vbCrLf
- Next
- MsgBox s ‘用對(duì)話框顯示信息
- End Sub
本文題目:熟練運(yùn)用VB.NET控件操作文件秘訣
分享鏈接:http://fisionsoft.com.cn/article/codsspp.html


咨詢
建站咨詢
