Estou tendo um problema para manter o foco num formulário que tem a seguinte rotina para impedir o fechamento inapropriado:
Private Sub Form_Unload(Cancel As Integer)
If IsNull(Me.CampoNome) Then
Cancel = True
Me.CampoNome.SetFocus
MsgBox "Informe o Nome."
End If
End Sub
O problema é que depois da MsgBox o foco não retorna para o form, fica uma marcação no botão fechar e a guia do form, que quando está ativado fica laranjada, acaba ficando cinza...
Isso tem conserto!?!... ah, estou usando formulário com guias e não com janelas tradicionais... Agradeço toda a ajuda!
Private Sub Form_Unload(Cancel As Integer)
If IsNull(Me.CampoNome) Then
Cancel = True
Me.CampoNome.SetFocus
MsgBox "Informe o Nome."
End If
End Sub
O problema é que depois da MsgBox o foco não retorna para o form, fica uma marcação no botão fechar e a guia do form, que quando está ativado fica laranjada, acaba ficando cinza...
Isso tem conserto!?!... ah, estou usando formulário com guias e não com janelas tradicionais... Agradeço toda a ajuda!