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