Applies ToAccess za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Izvršava metod objekta ili postavlja ili vraća svojstvo objekat.

Sintaksa

CallByName ( objekat , ime, tip poziva [, args()])

Sintaksa funkcije CallByName ima sledeće argumente:

Argument

Opis

objekat

Obavezno. Varijanta (objekat). Ime objekta na kojem će funkcija biti izvršena.

procname

Obavezno. Varijanta (niska). Izraz niske koji sadrži ime svojstva ili metoda objekta.

tip poziva

Obavezno. Konstanta. Konstanta tipa vbCallType koja predstavlja tip procedure koja se poziva.

args ()

Opcionalno. Varijanta (niz).

Napomene

Funkcija CallByName se koristi za pribavljanje ili postavljanje svojstva ili za pozivanje metoda u vremenu izvršavanja pomoću imena niske.

U sledećem primeru prvi red koristi CallByName za postavljanje svojstva okvira za tekst MousePointer, drugi red dobija vrednost svojstva MousePointer, a treći red poziva metod Move za premeštanje okvira za tekst:

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

Primer

Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.

Ovaj primer koristi funkciju CallByName za pozivanje metoda Premeštanje komandnog dugmeta.

Primer takođe koristi obrazac (Form1) sa dugmetom (Command1) i oznakom (Label1). Kada se obrazac učita, svojstvo natpisa oznake je postavljeno na ime metoda koji treba pozvati, u ovom slučaju "Premesti". Kada kliknete na dugme, funkcija CallByName poziva metod promene lokacije dugmeta.

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

Da li vam je potrebna dodatna pomoć?

Želite još opcija?

Istražite pogodnosti pretplate, pregledajte kurseve za obuku, saznajte kako da obezbedite uređaj i još mnogo toga.

Zajednice vam pomažu da postavljate pitanja i odgovarate na pitanja, dajete povratne informacije i čujete mišljenje od stručnjaka sa bogatim znanjem.