Childform that has focus

[aikidokid]

How can I write the following with the correct name of the childform that is open.

If "Open Childform Name" = cForm1 then ...

[Aaron Young]

Use the MDIForm's ActiveForm Property, i.e.

If MDIForm1.ActiveForm.Name = "Form1" Then 
  ...
End If

[aikidokid]

Thanks Aaron,
I am now getting the error
Object variable or with block variable not set.
This is my line of code

If MDIMain.ActiveForm.Name = "frmGradingCalc" Then cmbCourseList.Text = NewDate

Where NewDate is a global variable.

[John McKernan]

Originally posted by aikidokid
Thanks Aaron,
I am now getting the error
Object variable or with block variable not set.
This is my line of code

If MDIMain.ActiveForm.Name = "frmGradingCalc" Then cmbCourseList.Text = NewDate

Where NewDate is a global variable.

Where have you placed this line of code?

[Armbruster]

You will get this error if there are no active child forms, i.e. the form does not exist (object variable not set)

Try this . . .

If MDIMain.ActiveForm Is Nothing Then
    'no child form loaded
    'put whatever code you need here
ElseIf MDIMain.ActiveForm.Name = "frmGradingCalc" Then
    cmbCourseList.Text = NewDate
End If