open "c:\Content.txt" for input as #1do while not eof(1)line input #1,aText1.text=Text1.text&aloopclose #1'另外把Text1 的MultiLine 设成 True'ScrollBars 设成 Vertical 或者 Both'自己打出来的,没有运行过,如果有错误可以自己改一下
复制粘贴