Funktionen CallByName

Vigtigt: Denne artikel er maskinoversat. Se ansvarsfraskrivelsen. Du kan finde den engelske version af denne artikel her til din orientering.

Udfører en metode for et objekt eller angiver eller returnerer en egenskab for en objekt.

Syntaks

CallByName ( objekt , procname, calltype [, argumenter()])

Syntaksen for funktionen CallByName har følgende argumenter:

Argument

Beskrivelse

objekt

Der er påkrævet. Variant (Objekt). Navnet på det objekt, som funktionen vil blive udført.

procname

Der er påkrævet. Variant (Streng). Et strengudtryk, der indeholder navnet på en egenskab eller metode for objektet.

CallType

Der er påkrævet. Konstant. En konstant af typen vbCallType , der repræsenterer typen procedure, der kaldes.

argumenter ()

Valgfrit. Variant (Matrix).


Bemærkninger

Funktionen CallByName bruges til at hente eller angive en egenskab, eller at aktivere en metode på kørselstidspunktet, ved hjælp af en streng domænenavnet.

I eksemplet nedenfor den første linje bruger CallByName til at angive egenskaben musemarkør for et tekstfelt, den anden linje henter værdien af egenskaben musemarkør og den tredje linje anvender metoden flytte for at flytte tekstboksen:

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

Eksempel

Bemærk: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.

Dette eksempel bruges funktionen CallByName for at kalde metoden flytte for en kommandoknap.

I eksemplet bruges også en formular (Form1) med en knap (Command1) og et navn (Label1). Når formularen indlæses, angive egenskaben Titel for etiketten til navnet på metoden til at aktivere, i dette tilfælde "Flyt". Når du klikker på knappen, aktiverer funktionen CallByName metoden for at ændre placeringen af knappen.

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

Bemærk: Ansvarsfraskrivelse for maskinoversættelse: Denne artikel er blevet oversat af et computersystem uden menneskelig indgriben. Microsoft tilbyder disse maskinoversættelse for at hjælpe ikke-engelsktalende brugere til at kunne nyde indhold om Microsofts produkter, tjenester og teknologier. Da artiklen er maskinoversat, kan den indeholde forkerte ord eller syntaks- eller grammatikfejl.

Udvid dine færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Bliv Office Insider

Var disse oplysninger nyttige?

Tak for din feedback!

Tak for din feedback! Det lyder, som om det vil kunne hjælpe, hvis du bliver sat i forbindelse med en af vores Office-supportteknikere.

×