Funkcija CallByName

Pastaba: Norėtume jums kuo greičiau pateikti naujausią žinyno turinį jūsų kalba. Šis puslapis išverstas automatiškai, todėl gali būti gramatikos klaidų ar netikslumų. Mūsų tikslas – padaryti, kad šis turinys būtų jums naudingas. Gal galite šio puslapio apačioje mums pranešti, ar informacija buvo naudinga? Čia yra straipsnis anglų kalba, kuriuo galite pasinaudoti kaip patogia nuoroda.

Vykdo objekto metodą ar nustato arba grąžina yra objektas.

Sintaksė

CallByName ( objektą , procname, calltype [, ( args)])

Funkcija CallByName sintaksės argumentai:

Argumentas

Aprašas

objektas

Būtina. Variantas (Objektas). Objekto, kuriame bus vykdoma funkcijos pavadinimas.

procname

Būtina. Variantas (Eilutės). Eilutės išraiška ypatybės pavadinimą arba objekto metodą.

calltype

Būtina. Konstantos. Konstanta su tipo vbCallType , reiškiantis procedūra vadinama tipą.

args ()

Pasirinktinai. Variantas (Masyvas).


Pastabos

Funkcija CallByName naudojama gauti arba nustatyti ypatybę arba naudojant eilutės pavadinimą vykdymo metu iškviesti metodą.

Šiame pavyzdyje, pirmoje eilutėje naudoja CallByName teksto laukelio ypatybę rodyklę , antroje eilutėje gauna MousePointer turto vertės, o trečiosios eilutės nurodo perkelti metodą perkelti teksto lauką :

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

Pavyzdys

Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje funkcija CallByName taikyti perkelti būdas komandos mygtuko.

Formos (Form1) taip pat pavyzdyje mygtuką (Command1) ir etiketės (Label1). Kai forma įkeliama, etiketės ypatybė antraštė metodą iškviesti, pavadinimą nustatyta šiuo atveju "Perkelti". Spustelėjus mygtuką, funkcija CallByName iškviečia metodą, Norėdami pakeisti mygtuko vietą.

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
Tobulinkite savo „Office“ įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×