Jak zabránit formulář otevřený, pokud žádné záznamy ukázat?
Někdy je nutné, aby se zabránilo form Otevřít, pokud existují záznamy dokládající, například když dělá dotaz a žádná registrace není nutná, nepotřebujeme být otevřeny, protože nemáme žádná data k zobrazení. Takže to, co musíme ověřit, zda existují záznamy, které ukazují, a není-li zobrazit zprávu a bránit formou otevřené. Jak?
Je to jednoduché stačí dát kód níže ve formě nemovitostí v případě "otevřít":
= 0 Then Pokud Form.RecordsetClone.RecordCount
MsgBox "Nenalezeny žádné záznamy.", VbExclamation, "Chyba!"
DoCmd.Close acForm, "najít data"
Exit Sub
End If
Chcete-li vidět příklad stažení: Zabránit formulář Otevřít
Prezentovány příkladem je vynikající.
Souhlasím s předchozím přezkumu!
Jednoduché a účinné!
Děkuji vám!