VB6 form_load传递参数

Question

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

例如，

Private Sub Form_Load(ByVal type as integer)

End Sub

不幸的是，当我输入它时会发生错误。

有什么想法吗？

Answer 1

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

Answer 2

是的，你不能:)

但是你可以加载表单，然后填写表单上的公共变量，然后调用你创建的子，或者在form_show中进行处理

Answer 3

你做相反的方式声明一个函数，它将一个表单作为参数并使用它;-)

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