CallByName İşlevi

Önemli : Bu makale makine çevisidir. Bkz. yasal uyarı. Bu makalenin İngilizce sürümüne buradan ulaşabilirsiniz.

Bir nesnenin yöntemini yürütür veya ayarlar veya bir nesneözelliğini döndürür.

Söz dizimi

CallByName Nesne (, procname, calltype [, args()])

CallByName işlevi sözdiziminde aşağıdaki bağımsız değişkenler bulunur:

Bağımsız Değişken

Açıklama

Nesne

Gerekli. Değişken (Nesne). İşlev yürütülür nesnesinin adı.

procname

Gerekli. Değişken (Dize). Nesnesinin yöntemini veya bir özellik adını içeren bir dize ifadesi.

CallType

Gerekli. Sabit. Çağrılan yordam türünü temsil eden türü vbCallType sabit.

args ()

İsteğe bağlı. Değişken (Dizi).


Notlar

CallByName işlevi bir özelliği ayarlamak veya almak için ya da bir dize adı kullanarak çalışma zamanında bir yöntemi çağırmak için kullanılır.

Aşağıdaki örnekte, bir metin kutusunun Fare işaretçisi özelliğini ayarlamak için ilk satırını CallByName kullanır, Fare işaretçisi özelliğinin değeri ikinci satır alır ve üçüncü satır metin kutusunu taşımak için Taşı yöntemini çağırır:

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

Örnek

Not : Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.

Bu örnekte, bir komut düğmesi taşıma yöntemini çağırmak için CallByName işlevi kullanılmaktadır.

Örnek form (Form1) düğmesi (Command1) ve bir etiket (Label1) de kullanır. Form yüklendiğinde, Resim yazısı özelliği etiketin yöntemi harekete geçirmek için adının üzerine bu durumda, "Taşı" ayarlanır. Düğmeyi tıklattığınızda, CallByName işlevi düğmesinin konumunu değiştirmek için yöntemini çağırır.

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

Not : Makine Çevirisi Yasal Uyarısı: Bu makale, insan müdahalesi olmadan bir bilgisayar sistemi tarafından çevrilmiştir. Microsoft bu makine çevirilerini İngilizce bilmeyen kullanıcıların Microsoft ürünleri, hizmetleri ve teknolojileriyle ilgili içeriklerden yararlanmasına yardımcı olmak için sunar. Bu makale makine çevirisi olduğundan sözcük, cümle dizilimi ve gramer hataları içerebilir.

Yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Office Insider Programına Katılın

Bu bilgi yararlı oldu mu?

Görüşleriniz için teşekkür ederiz!

Geri bildiriminiz için teşekkürler! Office destek temsilcilerimizden biriyle görüşmeniz yararlı olabilir.

×