Option Explicit
Private Sub Form_Load()
Show
RichTextBox1.LoadFile (App.Path & "\001.rtf")
DoEvents
RichTextBox1.LoadFile (App.Path & "\杨乐.txt")
End Sub
方法:双击“001.rtf”,(只看见一个回车符号),选中它,用“Word”工具栏设置它的行距、字符间距、
字体、字号等等。保存好就行了。
这个文件自己用“Word”建立也很容易:仅一个回车,设置好行距等等之后,保...