Funkcija CallByName

Piezīme.:  Mēs vēlamies sniegt jums visjaunāko palīdzības saturu jūsu valodā, cik vien ātri to varam. Šī lapa ir tulkota automatizēti, un tajā var būt gramatiskas kļūdas un neprecizitātes. Mūsu nolūks ir šo saturu padarīt jums noderīgu. Vai lapas lejasdaļā varat mums pavēstīt, vai informācija jums noderēja? Ērtai atsaucei šeit ir šis raksts angļu valodā .

Izpilda metodi objektu, vai iestata vai atgriež objektsrekvizīts.

Sintakse

CallByName ( objekta , procname, calltype [, args()] /)

CallByName sintaksē ir šādi argumenti:

Arguments

Apraksts

objektu

Obligāts. Varianta (Objekts). Objekta, kurā tiks izpildīts funkcijas nosaukums.

procname

Obligāts. Varianta (Virknes). Virknes izteiksme, kas satur rekvizīta nosaukumu vai objekta metodi.

calltype

Obligāts. Konstantes. Konstantes tipu vbCallType procedūru, ko sauc par veidam.

args ()

Pēc izvēles. Varianta (Masīvs).


Piezīmes

Funkcija CallByName izmanto, lai iegūtu vai iestatīt rekvizītu, vai izsaukt metodi palaišanas laikā, izmantojot virkni nosaukumu.

Šajā piemērā pirmajā rindā izmanto CallByName tekstlodziņa MousePointer rekvizīta iestatīšana, otrajā rindā tiek MousePointer rekvizīta vērtību un trešajā rindā atsaucas uz Pārvietot metodes, lai pārvietotu tekstlodziņu :

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

Piemērs.

Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Šajā piemērā izmantota funkcija CallByName izsaukt komandpogu pārvietošana metodi.

Piemērā tiek arī izmantota forma (Form1) ar pogu (Command1) un etiķeti (Label1). Ielādējot formas rekvizīts Caption etiķetes ir iestatīts uz metodes izsaukt, nosaukums šajā gadījumā "Pārvietot". Kad noklikšķināt uz pogas, funkcija CallByName izsauc metodi, lai mainītu pogas atrašanās vietu.

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
Paplašiniet savas Office prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta aģentiem.

×