窗体上有菜单,ToolBar,Statusbar,当然还有RichTextBox。
Toolbar,Statusbar都有Align属性,为什么RichTextBox没有,若有一个,且设值为vbAlignClient,则可以随着窗体的大小改变而改变,该多好!这种性质用代码怎么实现?非常感谢!!!

解决方案 »

  1.   

    我用如下代码实现,但总感觉不太爽,是否有更好的方法?Private Sub Form_Resize()
      RichTextBox1.Left = 0
      RichTextBox1.Top = Toolbar1.Height
      RichTextBox1.Width = ScaleWidth
      RichTextBox1.Height = ScaleHeight - StatusBar1.Height - Toolbar1.Height
    End Sub
      

  2.   


    Private Sub Form_Resize()
      richtextbox1.move 0,toolbar1.height,scalewidth, _
                        scaleheight-statusbar1.height-toolbar1.height
    End Sub
      

  3.   

    要是还不爽,就改用VB.net吧,那里面有。