与控件大小相关的只有以下代码:
Private Sub Form_Resize()
RichTextBox1.Top = 0
RichTextBox1.Left = 0
RichTextBox1.Width = Form1.Width
RichTextBox1.Height = Form1.Height
End Sub
请大虾们帮帮我。我都快疯了:)

解决方案 »

  1.   

      
       改成这样吧:
     RichTextBox1.Width = Form1.ScaleWidth
     RichTextBox1.Height = Form1.ScaleHeight
      

  2.   

    Private Sub Form_Resize()
        RichTextBox1.Top = 0
        RichTextBox1.Left = 0
        RichTextBox1.Width = Form1.ScaleWidth
        RichTextBox1.Height = Form1.ScaleHeight
    End Sub
      

  3.   

    天,又不能给分!看来csdn问题多多啊!!
      

  4.   

    说白了,Width,Height是窗口的尺寸,
    ScaleWidth,ScaleHeight是可描画区的尺寸,
    差个边框
    又拿不到分了???
    哎...