Visual Basic - Form_Unload no me resulta!!!!

Hola.

Estoy trabajando con un Form que tiene un DataGrid. La idea es que si en el campo "Option" hay registros con el valor "Modificar registro", no permita que el usuario cierre el formulario hasta que el registro sea modificado, pero esto solo me resulta si el registro que tiene el foco presenta ese valor.
Como puedo hacer para que busque en todo el recordset antes de cerrar, no solo en el registro que tiene el foco?

Este es el código que uso.
Gracias


Private Sub Form_Unload(Cancel As Integer)

If miRecordset.Recordset.Fields("Option").Value = "Modificar registro" Then
MsgBox "No puede cerrar este formulario" _
+ Chr(10) + "hay registros sin modificar", vbCritical, "Error"
Cancel = True
Else
Unload Me
End If
End Sub

Primero mira que el "Cancel" es del tipo integer, mejor asígnale el valor de 1, luego, dentro del form_unlaod, si llamas la instrucción unload me lo que haces es una redundancia, solo no lo llames.

Gracias Ayudante.

Ya cambie el código y quedó así.

Private Sub Form_Unload(Cancel As Integer)

SQL = "Select [Option] From [MiTabla] Where [Option] = 'Modificar registro'"
CNBASE.Execute SQL
MiRecordset.Refresh

DoEvents
If MiRecordset.Recordset.RecordCount > 0 Then
MsgBox "No puede cerrar este formulario" _
+ Chr(10) + "hay registros sin modificar", vbCritical, "Error"
Cancel = True
End If
End Sub

El problema ahora es que por mas que no presente ese valor no me lo deja cerrar...