※ 引述《needhope (Let's move out)》之銘言： : ※ 引述《terance (修)》之銘言： : : 1. 表單開啟，讀取txt檔 : 書上剛好有寫 是哪一本書，好棒喔，我的書可能太新手了 : Open pathname For mode [Access access] [lock] As [#]filenumber : pathname參數 : 檔案名稱或是完整路徑資訊 : mode參數 : Append：資料附加在檔尾 : Binary：二進位檔案存取 : Input：讀取檔案的內容，通常用於文字檔存取 : Output：寫入檔案的內容，通常用於文字檔寫入 : Random：隨機檔存取，預設值 : Access參數 : Read：唯讀 : Write：唯寫?! : ReadWriter：可讀寫 : Lock參數 : Shared：共用 : LockRead：讀取鎖定 : LockWrite：寫入鎖定 : LockReadWrite：鎖定二者 : FileNumber參數 : 必要參數，可使用FreeFile()取得 : Len參數 : 選用.. : ------------- : ex: : num = FreeFile() '取得檔案通道編號 : Open "C:\test.txt" For Input Access Read As #num '開檔 我複製上面這行把他在FORM的LOAD裡面 然後上面這一行會執行錯誤，可以幫我抓抓BUG嗎 還有阿，我不懂為何num前面要放#，可以教教我嗎 : Dim vtDatas : Do Until EOF(num) 'EOF()檢查檔案結尾?! : Line Input #num, vtDatas '逐行讀入 -> vtDatas : Loop : Close #num '關閉檔案通道 : Text1.Text = vtDatas : : 2. 讓combobox的內容＝txt內容 : : 至於怎麼判斷多少內容為一個item就再說吧 : 這我就不太懂了.. : 我猜可以在 Do While...Loop 裏修改 我手邊有實做出來的案例，還在研讀中，不懂在拿來問問 : 將讀入的文字指定為combobox的item : : 但是這兩個，新手教學的書都沒有提到 : : 不知道有沒有什麼好功能可以用呢 : 希望對你有幫助 --

※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.168.218.44