VB6 Form_load Pass Paramets

Question

Я хочу передать параметр в другую форму, используя метод Form_load.

Например,

Private Sub Form_Load(ByVal type as integer)

End Sub

К сожалению, возникает ошибка, когда я набираю это.

Любые идеи?

Answer 1

Да, ты не можешь :)

Но вы можете загрузить форму, затем заполнить общедоступные переменные в форме, а затем вызвать подготовку, которую вы делаете, или выполнить обработку в Form_show

Answer 2

Другой вариант - это метод «конструктора», который принимает нужные параметры, и вызывает Me.ShowАнкет Затем метод можно назвать вместо CustomForm.Show в другом модуле.

Answer 3

Вы делаете все вокруг

Объявите функцию, которая принимает форму в качестве параметра и используйте это ;-)

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