討論串(共5篇) - [VB6 ] 讀取txt - 看板Visual_Basic

看板 [ Visual_Basic ]

討論串[VB6 ] 讀取txt

共 5 篇文章

排序：最新先 | 最舊先 | 留言數 | 推文總分

內容預覽：開啟 | 關閉 | 只限未讀

首頁

尾頁

Re: [VB6 ] 讀取txt

推噓0(0推 )留言3則，0人參與作者CuckooBoy (書仔)時間17年前 (2008/06/28 20:36)資訊

內容預覽:

感謝提醒. Private Sub Form_Load(). Dim f, cnt As Integer, titledata, autherdata, timedata, item1data,. item2data, item3data, item4data As String. f = Free

(還有378個字)

Re: [VB6 ] 讀取txt

推噓0(0推 )留言0則，0人參與作者MOONRAKER (㊣烏笨禿，又笨又禿)時間17年前 (2008/06/28 15:40)資訊

內容預覽:

雖然我也很習慣這種老寫法，一般而言這也沒什麼不好，反正都可以完成任務. 但是建議你改用 filesystemobject / textstream 這種現代一點的寫法. 將來轉到ASP或*.NET上面的時候才比較好適應. 不要只會這個open；那至少有20年歷史，都快老掉牙了. 而且到*.NET就不

(還有690個字)

Re: [VB6 ] 讀取txt

推噓0(0推 )留言1則，0人參與作者CuckooBoy (書仔)時間17年前 (2008/06/28 15:36)資訊

內容預覽:

Private Sub Form_Load(). Dim f, cnt As Integer, titledata, autherdata As String. f = FreeFile. Open App.Path & "\Backup.ini" For Input As #f. While No

(還有404個字)

Re: [VB6 ] 讀取txt

推噓0(0推 )留言0則，0人參與作者a9 (a9)時間17年前 (2008/06/28 13:43)資訊

內容預覽:

Dim f as Integer,sLine As String. f=FreeFile '取得一個可用的檔案代碼. Open App.Path & \"Backup.ini" For Input As #f '用Input方式開檔. While Not EOF(f) '如果還沒到檔尾. Line

[VB6 ] 讀取txt

推噓1(1推 )留言9則，0人參與作者CuckooBoy (書仔)時間17年前 (2008/06/28 12:28)資訊

內容預覽:

照書demo打,執行說.....a$ 找不到方法或成員??. 哪邊有錯呢?. 高手可以推一把嗎?>"<. Private Sub Form_Load(). Open App.Path & "\Backup.ini" For Output As #1. Line Input #1, a$. Title

首頁

尾頁