這篇文章將為大家詳細講解有關VB.NET中 OPEN語句如何使用，文章內(nèi)容質(zhì)量較高，因此小編分享給大家做個參考，希望大家閱讀完這篇文章后對相關知識有一定的了解。

成都創(chuàng)新互聯(lián)專注于果洛州網(wǎng)站建設服務及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗。 熱誠為您提供果洛州營銷型網(wǎng)站建設，果洛州網(wǎng)站制作、果洛州網(wǎng)頁設計、果洛州網(wǎng)站官網(wǎng)定制、小程序開發(fā)服務，打造果洛州網(wǎng)絡公司原創(chuàng)品牌,更為您提供果洛州網(wǎng)站排名全網(wǎng)營銷落地服務。

VB.NET OPEN語句方法一:

用定長的String變量獲取文本內(nèi)容。由于定長String變量支持的下界為65400,所以在打開超過32K字節(jié)的文件時超出部分的字節(jié)將無法獲取:

Private Sub Command1_Cliack()  Dim sA As String * 65400 '聲明定長String變量   Open "F:\d.txt" For Binary As #1 '用二進制打開文件  Get #1, , sA '用Get語句從文件中獲取字節(jié)  Text1 = sA '顯示打開的文件  Close #1 '關閉文件  End Sub

VB.NET OPEN語句方法二:

先聲明一字符串變量，然后用空格填充字符串，使變量大小與文件大小一致，再通過Get語句將文件全部數(shù)據(jù)存儲到變量中，從而達到獲取整個文件字節(jié)數(shù)的目的。此法可以打開大于32K的文件，但應該注意的是，裝載文件的容器必須能裝載大于32K的文件，下例用RichTextBox控件顯示打開的文件：

Private Sub Command1_Click()   Dim sA As String  Open "f:\d.txt" For Binary As #1  sA = Space(LOF(1)) '用空格填充sA變量  Get #1, , sA '用Get語句獲取文件全部內(nèi)容  RichTextBox1.Text = sA Close #1  End Sub

VB.NET OPEN語句方法三：

用StrConv函數(shù)將文件的控制字符串數(shù)據(jù)和Unicode碼之間進行轉(zhuǎn)換，從而達到打開文件的目的。可打開任意大小文件。此法筆者曾有一篇文章談及，這里再給一個簡單例子：

Private Sub Command1_Click()  Open "f:\d.txt" For Input As #1  RichTextBox1.Text = StrConv(InputB$(LOF(1), 1), vbUnicode)  Close #1  End Sub

VB.NET OPEN語句方法四：

用Shell語句直接調(diào)出Windows的記事本，給個文件名即可輕而易舉地打開文本文件。此法適合于打開程序的Readme文件(注意：在可執(zhí)行文件和要打開的文本文件之間要有空格)：

Shell "NotePad.EXE f:\d.txt",vbNormalFucus

VB.NET OPEN語句方法五：

用RichTextBox控件自身的LoadFile屬性打開文件：  RichTextBox1.LoadFile "f:\d.txt", rtfText

關于VB.NET中 OPEN語句如何使用就分享到這里了，希望以上內(nèi)容可以對大家有一定的幫助，可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。

網(wǎng)站名稱：VB.NET中OPEN語句如何使用
轉(zhuǎn)載來于：http://chinadenli.net/article2/giidic.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供做網(wǎng)站、小程序開發(fā)、標簽優(yōu)化、網(wǎng)站設計公司、虛擬主機、網(wǎng)站建設

廣告

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