VB6 form_load传递参数

【问题标题】：VB6 form_load pass parametersVB6 form_load传递参数
【发布时间】：2011-12-11 21:02:41
【问题描述】：

我想使用 form_load 方法将参数传递给另一个表单。

例如，

Private Sub Form_Load(ByVal type as integer)

End Sub

很遗憾，当我键入此内容时出现错误。

有什么想法吗？

【问题讨论】：

【解决方案1】：

另一个选项是“构造函数”方法，它接受你想要的参数并调用Me.Show。然后可以调用该方法而不是其他模块中的CustomForm.Show。

【讨论】：

【解决方案2】：

是的，你不能:)

但是你可以加载表单，然后在表单上填充公共变量，然后调用你制作的sub，或者在form_show中进行处理

【讨论】：

【解决方案3】：

你反其道而行之

声明一个将表单作为参数的函数并使用它;-)

public sub mbox(msg as String, frm as Form)
  frm.label1.caption = msg
end Function

【讨论】：