Izvršava metod objekta ili postavlja ili vraća nekretninu objekat.
Sintaksa
Kalkuliname ( objekat , prokname, Otkucajte [, args()])
Sintaksa funkcije Callename ima sledeće argumente:
|
Argument |
Opis |
|
objekat |
Obavezno. Varijanta (objekat). Ime objekta na kojem će funkcija biti izvršena. |
|
prokname |
Obavezno. Varijanta (Niska). Izraz niske koji sadrži ime svojine ili metoda objekta. |
|
Tip kalendara |
Obavezno. Konstanta. Stalna funkcija Vancalltype koja predstavlja tip procedure koja se zove. |
|
args () |
Opcionalno. Varijanta (niz). |
Napomene
Funkcija CallByName se koristi za postavljanje ili postavljanje vlasništva ili za pozivanje metoda u trenutku izvođenja pomoću imena niske.
U sledećem primeru, prvi red koristi Kalbyname da bi podesio polje za pokazivač miša na okvir za tekst, drugi red dobija vrednost polja miša , a treći red poziva metod premeštanja da premesti okvir za tekst:
CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = 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 da bi pozivala metod premeštanja komandnog dugmeta.
Primer koristi i obrazac (Form1) sa dugmetom (Command1) i oznakom (Label1). Kada je obrazac učitan, vlasništvo natpisa oznake je postavljeno na ime metoda za pozivanje, u ovom slučaju "premesti". Kada kliknete na dugme, funkcija CallByName poziva metod da promeni lokaciju dugmeta.
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
