privatesubcommand1_click()
open"c:\123.txt"forinputas#1
n=0
dowhilenoteof(1)
lineinput#1,a
n=n+1
ifn=3then
text1.text=a
exitdo
endif
loop
close#1
endsub
這樣就可以了。用n來控制行數(shù)。當(dāng)?shù)竭_(dá)了第三行,就輸出到文本框,然后退出循環(huán)。
privatesubcommand1_click()
open"c:\123.txt"forinputas#1
n=0
dowhilenoteof(1)
lineinput#1,a
n=n+1
ifn=3then
text1.text=a
exitdo
endif
loop
close#1
endsub
這樣就可以了。用n來控制行數(shù)。當(dāng)?shù)竭_(dá)了第三行,就輸出到文本框,然后退出循環(huán)。