Параметры передачи 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