当电脑分辨率改变时,怎样根据窗体的大小自动调整控件的大小进行合适的显示啊?我刚学也不知道用什么函数啊什么的。谢谢各位大侠了先!

解决方案 »

  1.   

    Private Sub Form_Load()
    Form1.Height = Screen.Height
    Form1.Width = Screen.Width
    End Sub
      

  2.   

    Private Sub Form_Load()
    Form1.Left = 0
    Form1.Top = 0
    Form1.Height = Screen.Height
    Form1.Width = Screen.Width
    End Sub
      

  3.   

    例如:在窗体上放一个ListView
    Private Sub Form_Resize()
        If Form1.WindowState <> 1 Then
            ListView1.Move ListView1.Left, ListView1.Top, Me.ScaleWidth - ListView1.Left - 100, Me.ScaleHeight - ListView1.Top - 100
        End If
    End Sub
      

  4.   

    Private Sub form_resize()
     command1.Move Width / 2, Height / 2, 1 * Width / 10, Height / 20
    end sub
      

  5.   

    "resize"事件可以解决这样的问题!!!
    具体的用法你可以看一下MSDN中的语言参考....
    希望可以帮你^_^!!