Érvényesség
BoundObjectFrame objektum |
Label objektum |
Rectangle objektum |
---|---|---|
CheckBox objektum |
ListBox objektum |
Section objektum |
ComboBox objektum |
ObjectFrame objektum |
TabControl gyűjtemény |
CommandButton objektum |
OptionButton objektum |
TextBox objektum |
Form objektum |
OptionGroup objektum |
ToggleButton objektum |
Image objektum |
Page objektum |
Beállítja vagy visszaadja az Érvényesség listában szereplő objektumok valamelyikénél a Tulajdonságok ablakbeli Kattintásra mezőben szereplő értéket. Olvasható/írható karakterlánc.
kifejezés.OnClick
Kifejezés Megadása kötelező. Egy kifejezés, amely a Hatókör listában szereplő objektumok egyikét adja vissza.
Megjegyzések
Ez a tulajdonság akkor hasznos, ha programozott módon módosítja az Access által egy esemény aktiválásakor végrehajtandó műveletet. Előfordulhat például, hogy két eseményhívás között módosítani kell egy kifejezés paramétereit, vagy át kell váltani egy eseményvezérelt eljárásról egy kifejezésre vagy makróra, attól függően, hogy milyen körülmények között került sor az esemény indítására.
A Click esemény akkor következik be, amikor egy objektum felett lenyomja, majd felengedi a bal egérgombot.
Az OnClick (Kattintásra) tulajdonság az alábbi értékeket veszi fel, attól függően, hogy mit választ a Szerkesztő kiválasztása ablakban (amely az objektum Tulajdonságok ablakának Kattintásra mezője melletti Felépítés gombra kattintva nyitható meg):
-
A Kifejezésszerkesztő választása esetén az érték „=kifejezés” lesz, ahol a kifejezés a Kifejezésszerkesztő ablakába beírt kifejezés.
-
A Makrószerkesztő választása esetén az érték a makró neve.
-
A Kódszerkesztő választása esetén az érték „[Eseményvezérelt eljárás]” lesz.
Ha a Kattintásra mező üres, a tulajdonság értéke egy üres karakterlánc.
Példa
Az alábbi példa társítja az „Order Entry” űrlap „OK” nevű gombjának Click eseményét az „OK_Click” eseményvezérelt eljárással, ha nincs még meglévő társítás.
With Forms("Order Entry").Controls("OK")
If .OnClick = "" Then
.OnClick = "[Event Procedure]"
End If
End With