我现想做到程序的界面随显示器分辨率的变化而自动调整界面的布局???
   谢谢!!!

解决方案 »

  1.   

    可以根据screen.height和screen.width来设置form的height和width,然后在form_resize中重新布局窗体。
      

  2.   

    screen.height=form.height
    screen.width=form.width
    简单的方法可以用timer控件来控制!
    -----------------------------------------------------------------------
    人在江湖,人不由已!我喜欢程序员这职业!
      

  3.   

    Private Sub Command1_Click()
    Timer1.Enabled = False
    End SubPrivate Sub Timer1_Timer()
    Form1.Top = 0
    Form1.Left = 0
    Form1.Height = Screen.Height
    Form1.Width = Screen.Width
    End Sub不一定能达到效果,可是可提一下方法。
    -----------------------------------------------------------------------
    人在江湖,人不由已!我喜欢程序员这职业!