→ MOONRAKER:使用while not eof(1) ... wend 05/29 19:30
請問一下，要怎麼用VB6去搜尋檔案內的特定的字串??
我的做法如下:
Private Sub Command1_Click()
Dim test As String
Open "function\ping.txt" For Input As #1
Input #1, test
Label1.Caption = InStr(test, "3")
___________________________________________
ping.txt內容:
abcdefghijklmnopqrstuvwxyz
123456789
___________________________________________
程式一直show "0"，原因應該是他只讀到ping.txt的第一行而已
請問要怎麼讓程式去抓到全部的檔案??
謝謝~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.120.179.172