Pytanie : Hourglass gdy używać w Wizerunek Onclick wydarzenie w Dostęp 2007

I używać Dostęp 2007. I znać jeżeli the problem istnieć w inny wersja lub nie.  Gdy zapoczątkowywać the Hourglass rozkaz na nakazowy guzik, the kursor zmiana hourglass jak ono przypuszczać. Gdy zapoczątkowywać the ten sam kod na the OnClick wydarzenie wizerunek, the kursor zmieniać hourglass.  Jako przykład, klajstrować the następujący linia kod za the Onclick rozkaz nakazowy guzik, i klajstrować the kod za the onclick wydarzenie the wizerunek i wtedy porównywać the rezultat.  To mieć rozwiązanie to?

Dim dt Jako Date
DoCmd.Hourglass True
dt = DateAdd ("s", 6, Teraz ())
Do Do dt < Now
DoEvents
Loop
DoCmd.Hourglass False
MsgBox "Kończyć "

Odpowiedź : Hourglass gdy używać w Wizerunek Onclick wydarzenie w Dostęp 2007

I właśnie próbować w Dostęp 2003 i obserwować the ten sam rzecz. Ono być problem z ekran odświeżać (treser obchodzić się DoEvents jakkolwiek) ponieważ Me.Caption doEvents przy the wierzchołek the treser być natychmiast widoczny.

Z jednej strony, gdy kroczenie przez the kod, the hourglass pracować, ale the VB Redaktor być aktywny przy ten czas. I móc tylko że wizerunek mieć różny mysz plan miarowy kontrola: the rama zdarzać się dla wizerunek kontrola i broszurowany przedmiot rama.

Używać conagraman's propozycja lub umieszczać the wizerunek bezpośrednio w the guzik (jeżeli ty chcieć tego rodzaju spojrzenie). I znajdować sposób the hourglass, nawet the ostrość i inny jednakowy sztuczka, ale I biedak próbować WinAPI wezwanie - I być pewny ono być ewentualny jeżeli ty naprawdę potrzebować ono.

(°v°)