如何使textbox文字上下放在中间

  在窗体上放一个textbox控件，设置MultiLine属性为true，放一个timer控件，放一个command控件，复制下面的代码就可以了。 Dim zihu As String Dim i As Long Private Sub Command1_Click() Text1 =  zihu = 奥林匹克圣火、火炬传递路线和火炬手是构成一届奥运会火炬接力的最基本元素，而火炬手在这其中最富有感染力的一部分。    & Chr(13) & Chr(10) & 北京...