Raiseevents not functioning

[BryanJ]

I have two forms, a parent form and a child form which is launched from the parent. As the child form can differ I want to create an event in the parent form and sent it to the child form.

My code does not fire the event in the child form any ideas. Is it possible to do this in forms

Parent form code.....

Public Event Myevent()

Private Sub Command1_Click()
Form2.Show
End Sub

Private Sub Command2_Click()
RaiseEvent Myevent
End Sub

--------------------------------------------------------------------------------
Child form code...
Private WithEvents frm As Form1

Private Sub frm_Myevent()
Text1.Text = "Got it"
End Sub

[Merri]

Hmm... you're like trying to do an event that will be called on each of the child forms? Why so? You could just go through each of the child forms. For example:

Dim A As Integer
For A = 0 To Forms.Count - 1
    If Forms(A).Name = "ChildType1" Or "ChildType2" Then
         'do stuff to that form
    End If
Next A

Though it'd be easier to help if I knew what you're trying to do (meaning, why you want to do that).