请问复制word里的文字,到QQ或记事本里格式变了,怎么办,如何保留原来排版格式

见图,word里格式是这样的,但复制到QQ,记事本,网页里却成了这样,我想保持WORD原排版格式

窗框拉长拉宽时，里的子窗体边框自动变长变宽
Private Sub Form_Resize() On Error Resume Next Me.子窗体1.Width = Me.InsideWidth Me.子窗体1.Height = Me.InsideHeight - Me.Section(acHeader).Height - Me.Section(acFooter).Height) - Me.子窗体1.Top End Sub
这一段与word里的排版模式不一样
Private Sub Form_Resize() On Error Resume Next Me.子窗体1.Width = Me.InsideWidth Me.子窗体1.Height = Me.InsideHeight - Me.Section(acHeader).Height - Me.Section(acFooter).Height) - Me.子窗体1.Top End Sub