房天下

Fang.com
房天下 > 房天下问答 > 业主生活 > 其他

  • 用VB编写读取文本的代码

    现在文本文档里有行是空行，当读取到这一行的时候，则把下一行的内容替换到这一行。

    提问者：闲云野

    发布于2011-02-12

共1个回答
  • kuaidianzhong 丨Lv 4
    Dim Lstr As String (用来存储文本中读取到的字符串)Open "G:\ww.txt" For Input As #1 （打开文本，读取内容）Do While Not EOF(1) （开始按行循环读取） Line Input #1, Lstr If Lstr <> "" Then （如果读取到一行不为空，即不为空行时显示在Text1中） Text1.Text = Text1.Text & Lstr & vbCrLf End IfLoopClose #1需要说明的是Text的MultiLine属性要选择为True即该Text中文本显示为多行模式
    +1 2011-02-12 举报
热门人气推荐
推荐楼盘小区二手房商圈租房热门知识 相关推荐房产百科
免责声明：问答内容均来源于互联网用户，房天下对其内容不负责任，如有版权或其他问题可以联系房天下进行删除。