这个VB程序该怎样改？

来源：百度知道 编辑：UC知道 时间：2024/05/22 12:02:17
几个窗口都要用这个，我想写在模块里，但提示"me"关键字不能在这里引用，该怎样改？
Public Sub Frmsize()
me.Left = list.Left + 2505
me.Top = 10
me.Height = MDIForm1.ScaleHeight - 40
me.Width = MDIForm1.ScaleWidth - list.Width
end sub

可以在调用这个Sub过程时将窗体当作参数传过去,程序如下(假设每个Frm都有一个List控件,而且程序中的List控件就是Frm中的List控件):
Public Sub Frmsize(Frm as Form)
Frm.Left = Frm!list.Left + 2505
Frm.Top = 10
Frm.Height = MDIForm1.ScaleHeight - 40
Frm.Width = MDIForm1.ScaleWidth - Frm!list.Width
end sub

首先不考虑是不是可以写在模块呵.
你这个代码在窗体最大化时不会出错吗? .

^&^