Da nebi program pucao ako se ne unesu putanje do fajlova, a nesmotreno pritisne dugme Comapre, neophodno je dodati još i ovo:
Code:
Private Sub Compare_GotFocus()
If IsNull([Master]) Then
MsgBox "Morate odabrati master fajl", vbCritical, "Paznja"
Me![Master].SetFocus
Exit Sub
End If
If IsNull([Protege]) Then
MsgBox "Morate odabrati protage fajl", vbCritical, "Paznja"
Me![Protege].SetFocus
Exit Sub
End If
End Sub
Naravno, treba i poređati kontrole u Tab Order.