两个极水的问题!!!!!~~

1 如果我要加载一个文本里的 一行一行的内容怎么加载
比如文本是
127.0.0.1
202.31.12.3
程序加载每行都ping 就是一次ping一行的2还有个更水的问题 等待高手解答 就是VB怎么 导出 列表控件的内容呢???.. 自动保存指定路径 txt格式最好

解决方案 »

  1.   

    open '文件名' For '打开方式' As #1
    i = LOF(1)
    close #1
      

  2.   

    csdn的大哥 大姐们 帮忙啊
      

  3.   

    Dim TextLine
    Open "C:\test.txt" For Input As #1   ' 打开文件。
    Do While Not EOF(1)   ' 循环至文件尾。
       Line Input #1, TextLine   ' 读入一行数据并将其赋予某变量。
       Debug.Print TextLine   ' 在立即窗口中显示数据。
    Loop
    Close #1   ' 关闭文件
      

  4.   

    thacks 那下面那个问题呢 这个哥哥谢谢你哈
      

  5.   

    TO viena(维也纳nn-实心木头人) 
    你的方法确实按楼主的要求解决了问题，但是这种方法效率并不高，我觉得主要是楼主原来的思路上的欠缺。
    建议一次性将整个文件读入一个字符串变量，再根据回车符号来分割（用SPLIT函数）
    这样会比较快。
      

  6.   

    open 文件 for 追加 as 文件号
    for ii=0 to 列表行数-1
      lprint 文件号 列表的ii+1行
    next
    close 文件
      

  7.   

    WallesCai你能具体点吗? 我也想知道如何把控件的内容读入一个EXCEL