- Katılım
- 25 May 2018
- Mesajlar
- 1,610
- En iyi yanıt
- 14
- Puanları
- 113
- Konum
- İstanbul
- Web sitesi
- excelarsivi.com
- Ad Soyad
- Murat OSMA
- Office Vers.
- Microsoft 365 TR+EN
CALLBYNAME( Object, ProcName, CallType, Args() )
Bir nesnenin yöntemini veya özelliğini döndürür, ayarlar veya yürütür. (Varyant)
Açıklamalar
* Bu sadece sınıf nesnelerle çalışır.
* Kodunuz bir sınıfta değilse, Application.Run'u kullanabilirsiniz.
* Bu işlev bir özellik almak veya ayarlamak veya bir dize adı kullanarak çalışma zamanında bir yöntemi çağırmak için kullanılır.
* Fonksiyonları, metotları ve özellikleri isme göre çağırmak için kullanılır.
Örnek Kullanım
UserForm üzerine 1 adet CommanButton ilave edin ve bu kodları da UserForm kod penceresine yapıştırıp butona basın.
Bir nesnenin yöntemini veya özelliğini döndürür, ayarlar veya yürütür. (Varyant)
Object | Fonksiyonun üzerinde çalışacağı nesne adı. (Object) |
ProcName | Nesnenin bir özelliği veya yönteminin adı. (String) |
CallType | Çağrılan yordamın türünü belirten bir vbCallType sabitidir. vbGet vbLet vbMethod vbSet |
Args() | Olası argüman dizisi. (Array) |
Açıklamalar
* Bu sadece sınıf nesnelerle çalışır.
* Kodunuz bir sınıfta değilse, Application.Run'u kullanabilirsiniz.
* Bu işlev bir özellik almak veya ayarlamak veya bir dize adı kullanarak çalışma zamanında bir yöntemi çağırmak için kullanılır.
* Fonksiyonları, metotları ve özellikleri isme göre çağırmak için kullanılır.
Örnek Kullanım
UserForm üzerine 1 adet CommanButton ilave edin ve bu kodları da UserForm kod penceresine yapıştırıp butona basın.
PHP:
Private Sub CommandButton1_Click()
MsgBox CallByName(Me, "Caption", VbGet)
CallByName Me, "BackColor", VbLet, vbRed
MsgBox CallByName(Me, "Topla", VbMethod, 14, 53)
Call CallByName(Me.CommandButton1, "Move", VbMethod, 100, 100)
End Sub
Function Topla(x As Integer, y As Integer)
Topla = x + y
End Function