怎样在记事本内容的最后加上一些内容？

一个记事本，内容比如说是
[boot loader]
timeout=3
default=multi(0)disk(0)rdisk(0)partition(1)\WINNT[operating systems]
multi(0)disk(0)rdisk(0)partition(1)\WINNT="Microsoft Windows 2000 Professional" /fastdetect
c:\bootsect.dos="MS-DOS 7.10" /win95如何在c:\bootsect.dos="MS-DOS 7.10" /win95的下面增加一行文字，什么都行？

解决方案 »

  1.   

    这是一个文本文件，用Open打开，直接用append添加一行即可。
    语法格式：open...for...append... as #1
      

  2.   

    Option ExplicitPrivate Sub Command1_Click()
            Dim FileNumber As Long
            FileNumber = FreeFile
            Open "d:\Txtfile.txt" For Append As #FileNumber
            'Print #FileNumber, vbCrLf
            Print #FileNumber, vbCrLf & "1234567890" & vbCrLf
            Close #FileNumber
    End Sub
      

  3.   

    这个成功了，不好意思，再请教一下，如果我要改第三行default=multi(0)disk(0)rdisk(0)partition(1)\WINNT 
    ，default=后面的内容，比如说改成default=c:\123,应该怎么改
      

  4.   

    思路还是那样，先open ... for input as #1 读入，然后执行各种字符串操作修改，最后open ... for output as #1写入。
      

  5.   

    还可以做一个dat文件，在保存时自动在文件末尾追加dat文件里的内容
      

  6.   

    这是一个Ini文件,你可以利用操作Ini文件的类来处理