frame适应界面大小的问题

Question

我想让界面上的frame随着界面大小的变化而自适应大小好像不能用resize()请大侠指教

Answer 1

关键是Frame里没有resize()这个方法

Answer 2

在form 的 resize 中控制 FRAME 的大小

Answer 3

例子
Private Sub Form_Resize()
On Error Resume Next
  '当窗体调整时会调整网格
  
  DataGrid1.Width = Me.ScaleWidth - 200
  DataGrid1.Height = Me.ScaleHeight - 1100
  Command1.Left = Me.ScaleWidth - Command1.Width - 100
  Command1.Top = Me.ScaleHeight - 400
End Sub

Answer 4

下面这组代码你试试,偶也正在用:
Private Sub Form_Load()
'窗体高度等于屏幕高度的六分之一
  Form1.Height = Screen.Height / 6
'窗体宽度等于屏幕宽度的六分之一
  Form1.Width = Screen.Width / 6
End SubPrivate Sub Form_Resize()
  Frame1.Move 0, 0, ScaleWidth, ScaleHeight
End Sub

Answer 5

Option ExplicitPrivate Sub Form_Resize()
    Frame1.Left = 0
    Frame1.Top = 0
    Frame1.Width = Me.ScaleWidth
    Frame1.Height = Me.ScaleHeight
End Sub