Makale IMPLEMENTS

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,316
En iyi yanıt
11
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Versiyon
Office 365 TR+EN
IMPLEMENTS [ InterFaceName, Class]

Class Modül'de uygulanabilecek bir ara birim veya sınıfı belirtir.


InterFaceName

Tür kitaplığındaki bir arabirimin adı.

Class

Tür kitaplığındaki bir sınıfın adı.

Açıklamalar
* Bu sadece Sınıf Modüllerinde (ClassModule) kullanılabilir
* ClassModule başlığında Makale olarak detaylı açıklama ve kullanımı paylaşılacaktır.

Örnek Kullanım
PHP:
'ClassModule kodları

Implements InterfaceClass

Public Property Get InterfaceClass_Field1() As Integer
   Debug.Print "Returning value of Field1"
End Property

Public Property Let InterfaceClass_Field1(ByVal iValue As Integer)
   Debug.Print "Writing value for Field1"
End Property

Public Property Get InterfaceClass_Property1() As String
   Debug.Print "Returning value of Property1"
End Property

Public Property Let InterfaceClass_Property1(ByVal sValue As String)
   Debug.Print "Writing value for Property1"
End Property

Public Sub InterfaceClass_Method1()
   Debug.Print "Method1 - Executing"
End Sub

Public Function InterfaceClass_Method2() As String
   InterfaceClass_Method2 = "Method2 - Returning"
End Function

PHP:
'Module kodları

Public Sub Testing()
       Dim myobject As MyInstance
       Set myobject = New MyInstance
       myobject.InterfaceClass_Field1 = 20
       myobject.InterfaceClass_Property1 = "Monday"

       Call myobject.InterfaceClass_Method1()
       Debug.Print myobject.InterfaceClass.Method2
End Sub
 
Son düzenleme:
Üst Alt