Non ti serve gestire l'evento formClosed della Form ma semplicemente una funzione che ritorni un valore in base a come sei uscito dalla form, in questo modo:
Form chiamante (Form1)
codice:
Form2.ShowDialog
If Form2.GetExitCod then
'Hai premuto Ok
Else
'Hai premuto Cancel
End If
Form2
codice:
Dim m_OutState as Boolean
Public Function GetExitCode() As Boolean
Return m_OutState
End Function
Private Sub buttonOK_Click(ByVal sender As Object, ByVal e As EventArgs)
m_OutState = True
Close()
End Sub
Private Sub buttonCancel_Click(ByVal sender As Object, ByVal e As EventArgs)
m_OutState = False
Close()
End Sub