请问在样才能使窗口的大小变化时，窗体中的控件的大小也跟着变化？

Question

RowResize 事件当某个用户调整一个 DataGrid 控件中的行尺寸时该事件发生。语法Private Sub object_RowResize ([ index As Integer,] cancel As Integer)RowResize 事件语法包括下列部分： 部分 描述 
object 对象表达式，其值为“应用于”列表中的一个对象。 
index 整数，用来标识一个在控件数组中的控件。 
cancel 如设置值中所描述的，是一个布尔表达式，指出是否取消一个改变。 
设置值cancel 的设置为：设置 描述 
True 取消所做的改变，把行恢复为原来的高度。 
False （缺省）继续高度改变。 
说明用户可以用鼠标调整 DataGrid 控件行的尺寸。当用户改变高度时，触发 RowResize 事件。 事件过程可以接受所做的改变，修改改变的程度，或完全取消所做的改变。DataGrid 控件的 RowHeight 属性确定了控件中所有行的高度。如果将 cancel 参数设置为 True ，则恢复行高度。要修改改变的程度，可设置 RowHeight 属性为想要的值。在过程中执行 Refresh 方法引起控件重画，不管 cancel 参数是否为 True。RowResize 事件示例
本例确保网格上至少有五个可见的行。Private Sub DataGrid1_RowResize (Cancel As Integer)
   If DataGrid1.VisibleRows < 5 Then Cancel = True
End Sub

Answer 1

例子
Private Sub Form_Resize()
'保证窗体大小变化的时候各控件的大小和位置不难看
Text1.Width = Me.ScaleWidth - 480
Command1.Left = Text1.Width + Text1.Left - Command1.Width - 30
TreeView1.Top = Text1.Top + Text1.Height + 300
DataGrid1.Top = Text1.Top + Text1.Height + 300
TreeView1.Height = Me.ScaleHeight - Text1.Top - Text1.Height - 600
TreeView1.Width = Me.ScaleWidth * 0.3
DataGrid1.Height = Me.ScaleHeight - Text1.Top - Text1.Height - 600
DataGrid1.Left = TreeView1.Left + TreeView1.Width + 300
DataGrid1.Width = Me.Width - TreeView1.Left - Me.ScaleWidth * 0.3 - 690
End Sub

Answer 2

thinkeasy(Nothing):老兄，人家在问窗体! Delphi中的窗体有Scale属性！
 如果你还处于选择编程工具的阶段，可以试试Delphi! Good Luck You!

Answer 3

多谢以上的各位，这些我都知道，我也都试过了，都没有达到我想要的效果，其实我想要的效果就像我们vb的编程环境的窗口(即IDE)那样？要实现成那样是不是很复杂呀？各位大虾以前做项目没有没把窗口做得很好是用的。就是无论在那种分辨率都能很好的显示？

Answer 4

那就用Hook或回调（我是菜鸟，这两种不是一样吧？）吧，接管Windows消息
当出现窗口改变大小的消息，就自己处理。其它的不要管。我去找一下看能不能给你一个例子。我以前看过源代码的。那个例子是：
当你把窗口大小拉小到一定程度时，就不能再拉小了，这个例子一定有很多人看过。很多源码网站或光盘都有。

Answer 5

好像就是这个，自己试试。能将窗口固定在一定范围内...　http://www.21code.com/codebase/?pos=down&id=478
源码类型： VisualBasic源码-窗口界面   尚无图片... 
 
 
  
上传时间： 2001-02-01  
  
下载次数： 89  
    
源码大小： 7 KB 源码评价：     
    
预计下载时间： 33.6K:0时0分1秒 56K:0时0分1秒 128K:0时0分0秒  
  
  
下载连接：下载连接 (No.1) 下载服务器状况检查： （说明） 
  
源码简介：
 控制窗体大小在一个固定范围内