VB read txt line--读取行数据!
<br />Private Sub Command1_Click()<br />Open "c:/1.txt" For Input As #1<br />Do While Not EOF(1)<br />Line Input #1, temp<br />x = x + 1<br />If x = 3 Then Print temp<br />Loop<br />Close #1<br />Print x & "行"<br />End Sub<br /> <br /> <br /> <br />读取后使用sp
原创
2010-09-29 22:29:00 ·
963 阅读 ·
1 评论