Applies ToMicrosoft 365 rakendus Access Access 2024 Access 2021 Access 2019 Access 2016

Käivitab objekti meetodi või määrab või tagastab objekti atribuudi.

Süntaks

CallByName ( object , procname, calltype [, args()])

Funktsiooni CallByName süntaksil on järgmised argumendid.

Argument

Kirjeldus

object

Nõutav. Andmetüüp Variant (Objekt). Objekti nimi, mille jaoks funktsioon käivitatakse.

procname

Nõutav. Andmetüüp Variant (String). Stringavaldis, mis sisaldab atribuudi või objekti meetodi nime.

calltype

Nõutav. Konstant. Konstant, mille tüüp on vbCallType ja mis näitab, millist tüüpi protseduuri kutsutakse.

args ()

Valikuline. Andmetüüp Variant (Massiiv).

Kommentaarid

Funktsiooni CallByName kasutatakse atribuudi toomiseks või määramiseks või käitusajal meetodi kutsumiseks stringi nime abil.

Järgmises näites määrab esimene rida funktsiooni CallByName kasutades tekstivälja atribuudi MousePointer, teine rida toob atribuudi MousePointer väärtuse ja kolmas rida kutsub tekstivälja teisaldamiseks meetodi Move.

CallByName Text1, "MousePointer", vbLet, vbCrosshairResult = CallByName (Text1, "MousePointer", vbGet)CallByName Text1, "Move", vbMethod, 100, 100

Näide

Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites kasutatakse funktsiooni CallByName käsunupu meetodi Move kutsumiseks.

Samuti kasutatakse selles näites vormi (Form1) nupuga (Command1) ja silti (Label1). Kui vorm on laaditud, määratakse sildi atribuudi Caption väärtuseks kutsutava meetodi nimi, praegusel juhul „Move“. Kui klõpsate nuppu, kutsub funktsioon CallByName nupu asukoha muutmiseks meetodi.

Option ExplicitPrivate Sub Form_Load()  Label1.Caption = "Move"' Name of Move method.End SubPrivate Sub Command1_Click()If Command1.Left <> 0 Then  CallByName Command1, Label1.Caption, vbMethod, 0, 0Else  CallByName Command1, Label1.Caption, vbMethod, 500, 500End If

Kas vajate veel abi?

Kas soovite rohkem valikuvariante?

Siin saate tutvuda tellimusega kaasnevate eelistega, sirvida koolituskursusi, õppida seadet kaitsma ja teha veel palju muud.

Kogukonnad aitavad teil küsimusi esitada ja neile vastuseid saada, anda tagasisidet ja saada nõu rikkalike teadmistega asjatundjatelt.