Re: [VBA ] 怎樣抓txt檔案裡的指定字串??

看板Visual_Basic作者 (VBA API)時間9年前 (2015/03/19 01:25), 編輯推噓0(0015)
留言15則, 3人參與, 最新討論串2/3 (看更多)
※ 引述《jacky33 (VBA API)》之銘言: : 請問各位高手,語法要怎麼寫可以抓txt檔裡或是可以用txt(or wardpad)打開的檔案。 : 檔案內容如下: : Mp1 Iinp n1 Vdd Vdd pch w=1u l=1u m=1 : Mq2 Ixxxp n231 Vd Vd pch w=200u l=1u m=1 : Mr3 1 2 3 4 pch w=3u l=1u m=1 : Q1:Mp1,Mq2,Mr3這三列可能在檔案內的任何位置,而且每一列開頭一定是"M",由左到右的順序 : 一定是Mp1 Iinp n1...等等。請問: : 我要如何找出或定義檔案裡"所有""M"開頭的列。比如說檔案裡共有3列"M"開頭的, : 名字分別叫"Mp1","Mq2","Mr3"。如何找到共"3"列跟其相對應的名字。 : Q2:比如說,當找到或是定義出Mp1這一列時,我要如何指定取出w=後面"1u"的這字串?? : 或是Mq2裡的l=1u 的"1u"?? : 感謝回覆!! 不好意思小弟我是初學者~ 剛看完連結的程式,還是有些不懂想請教: 1. Line Input #1, a$ =>a$是什麼意思阿?? 2.While Not EOF(1) 是未到檔案尾端,那如果我要讀到尾端又是怎麼寫?? 3.txtContent.Text = txtContent.Text & a$ & vbCrLf =>解釋我看不太懂?"&"又是是什麼 意思?"vbCrLf"又是什麼意思?? txtContent.Text = "" '清除內容 Open sFile$ For Input As #1 '開啟文字檔 While Not EOF(1) '未到檔案尾端 Line Input #1, a$ '逐行讀取 txtContent.Text = txtContent.Text & a$ & vbCrLf '逐行加入txtContent及換行符號 Wend '反覆執行 Close #1 '關閉檔案 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.141.125.179 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1426699514.A.F34.html

03/19 08:00, , 1F
如果這些你看不懂,還是先找本書K一下,不然版友給你建議
03/19 08:00, 1F

03/19 08:00, , 2F
給你的幫助也不大~~
03/19 08:00, 2F

03/19 08:01, , 3F
1.a$應該是在沒有指定Option Explicit的情況下,隱性宣告
03/19 08:01, 3F

03/19 08:02, , 4F
一個變數a,$代表型態是字串,老實說我覺得這種定義變數的
03/19 08:02, 4F

03/19 08:03, , 5F
方式非常不好,會讓你陷入找bug找半天的情況
03/19 08:03, 5F

03/19 08:05, , 6F
2.意思是還沒到檔案尾端的話,程式就繼續執行,就是你想要
03/19 08:05, 6F

03/19 08:05, , 7F
的功能,一直讀到檔案尾端才停
03/19 08:05, 7F

03/19 08:06, , 8F
3.&是字串連接運算子,vbCrLf是換行符號
03/19 08:06, 8F

03/19 08:07, , 9F
還有開檔案的時候非常不建議直接指定檔案號碼,應該使用
03/19 08:07, 9F

03/19 08:08, , 10F
FreeFile函式,由作業系統來替你找沒有使用過的號碼
03/19 08:08, 10F

03/19 10:25, , 11F
是不會用F1是嗎。
03/19 10:25, 11F

03/20 23:38, , 12F
謝謝wenyonba的指教,順帶可以問一下有哪本書介紹抓字串?
03/20 23:38, 12F

03/20 23:38, , 13F
F1是指???
03/20 23:38, 13F

03/21 02:17, , 14F
先有「一本」書再問哪一本書吧!賭你根本沒書。
03/21 02:17, 14F

03/21 02:18, , 15F
別人的耐性是會用完的
03/21 02:18, 15F
文章代碼(AID): #1L2RJwyq (Visual_Basic)
文章代碼(AID): #1L2RJwyq (Visual_Basic)