Funkcija CallByName

Izvede metodo predmeta ali nastavi ali vrne lastnost predmeta.

Sintaksa

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

Sintaksa funkcije CallByName ima te argumente:

Argument

Opis

predmet

Obvezno. Variant (predmet). Ime predmeta, v katerem bo izvedena funkcija.

procname

Obvezno. Variant (niz). Izraz niza, ki vsebuje ime lastnosti ali metode predmeta.

calltype

Obvezno. Konstanta. Konstanta tipa vbCallType, ki predstavlja tip priklicane procedure.

args ()

Izbirno. Variant (matrika).


Opombe

Funkcija CallByName se uporablja za pridobitev ali nastavitev lastnosti, ali za priklic metode v času izvajanja z imenom niza.

V tem primeru je v prvi vrstici uporabljena funkcija CallByName za nastavitev lastnosti MousePointer polja z besedilom, v drugi vrstici je pridobljena vrednost lastnosti MousePointer, v tretji vrstici pa je priklicana metoda Move za premik polja z besedilom:

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

Primer

Opomba : V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.

V tem primeru je funkcija CallByName uporabljena za priklic metode Move ukaznega gumba.

V tem primeru je uporabljen tudi obrazec (Form1) z gumbom (Command1) in oznako (Label1). Ko se obrazec naloži, je lastnost Caption oznake nastavljena na ime metode za priklic, v tem primeru »Premakni«. Ko kliknete gumb, funkcija CallByName prikliče metodo za spremembo mesta gumba.

Option Explicit
Private Sub Form_Load()
Label1.Caption = "Move"' Name of Move method.
End Sub
Private Sub Command1_Click()
If Command1.Left <> 0 Then
CallByName Command1, Label1.Caption, vbMethod, 0, 0
Else
CallByName Command1, Label1.Caption, vbMethod, 500, 500
End If
Razširite svoja znanja
Oglejte si izobraževanje
Prvi dobite nove funkcije
Pridružite se programu Office Insider

Vam je bila informacija v pomoč?

Zahvaljujemo se vam za povratne informacije.

Zahvaljujemo se vam za povratne informacije. Videti je, da bi vam prišla prav pomoč enega od naših Officeovih agentov za podporo.

×