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, vbCrosshairResult = 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 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
