Aracılığıyla paylaş

Nasıl yapılır: Özellik Oluşturma (Visual Basic)

Bir özellik tanımını Property deyimi ile End Property deyimi arasına yerleştirirsiniz. Bu tanımda bir Get yordam, yordam Set veya her ikisini de tanımlarsınız. Özelliğin tüm kodu bu prosedürlerde yer alır.

Get yordamı özelliğin değerini alır ve Set yordam bir değer depolar. Özelliğin okuma/yazma erişimi olmasını istiyorsanız, her iki yordamı da tanımlamanız gerekir. Salt okunur bir özellik için yalnızca Getöğesini tanımlarsınız ve salt yazma özelliği için yalnızca Setöğesini tanımlarsınız.

Bir özellik oluşturmak için

  1. Herhangi bir özellik veya yordamın dışında bir Özellik Deyimi ve ardından bir End Property ifadesi kullanın.

  2. özellik parametre alıyorsa, önce Property anahtar sözcüğü ile ardından yordam adını ve parametre listesini parantez içinde takip edin.

  3. Özelliğin değerinin veri türünü belirtmek için yan As tümcesiyle parantezleri izleyin. Yalnızca yazma özelliği için bile veri türünü belirtmeniz gerekir.

  4. Get ve Set yordamlarını uygun şekilde ekleyin. Aşağıdaki yönergelere bakın.

Bir özellik değerini almak için bir Get prosedürü oluşturmak

  1. Property ve End Property deyimleri arasında bir Get Deyimi ve ardından bir End Get deyim yazın. Herhangi bir parametreyi Get yordam için tanımlamanız gerekmez.

  2. ve Get deyimleri arasında End Get özelliğin değerini almak için kod deyimlerini yerleştirin. Bu kod, özelliğin değerini oluşturmaya ve döndürmeye ek olarak diğer hesaplamaları ve veri işlemelerini içerebilir.

  3. Özelliğin değerini çağıran koda döndürmek için bir Return deyimi kullanın.

Okuma-yazma özelliği ve salt okunur özellik için bir yordam yazmanız Get gerekir. Yalnızca yazılabilir bir özellik için Get yordamı tanımlamamalısınız.

Bir özelliğin değerini yazan bir Set yordamı oluşturmak için

  1. Property ve End Property deyimleri arasında bir Set Deyimi ve ardından bir End Set deyim yazın.

  2. Set deyiminde, isteğe bağlı olarak Set anahtar sözcüğünden sonra parantez içinde bir parametre listesi ekleyin. Parametre listesi mevcut değilse veya boşsa, özelliğin türünde olan Value adlı örtük bir parametre tanımlanır. Parametre listesi boş değilse, uygunsa farklı bir ad kullanabilirsiniz, ancak parametrenin özelliğin kendisiyle aynı veri türüne sahip olması gerekir.

  3. ve Set deyimleri arasında End Set özelliğinde bir değer depolamak için kod deyimlerini yerleştirin. Bu kod, özelliğin değerini doğrulamaya ve depolamaya ek olarak diğer hesaplamaları ve veri işlemelerini içerebilir.

  4. Çağıran kod tarafından sağlanan değeri kabul etmek için value parametresini kullanın. Bu değeri doğrudan bir atama deyiminde depolayabilir veya depolanacak iç değeri hesaplamak için bir ifadede kullanabilirsiniz.

Okuma-yazma özelliği ve salt yazma özelliği için bir Set yordam yazmalısınız. Salt okunur bir Set özelliği için prosedür tanımlamamalısınız.

Örnek

Aşağıdaki örnek, tam adı iki bileşen adı, adı ve soyadı olarak depolayan bir okuma/yazma özelliği oluşturur. fullName kod okunduğunda, Get yordam bileşen adları birleştirir ve tam adı döndürür. Çağrı kodu yeni bir tam ad atadığında, Set yordam bunu iki bileşen isme bölmeye çalışır. Eğer bir boşluk bulamazsa, hepsini ilk ad olarak depolar.

Dim firstName, lastName As String
Property fullName() As String
    Get
      If lastName = "" Then
          Return firstName
      Else
          Return firstName & " " & lastName
      End If

    End Get
    Set(ByVal Value As String)
        Dim space As Integer = Value.IndexOf(" ")
        If space < 0 Then
            firstName = Value
            lastName = ""
        Else
            firstName = Value.Substring(0, space)
            lastName = Value.Substring(space + 1)
        End If
    End Set
End Property

Aşağıdaki örnek, fullName özellik prosedürlerine yapılan tipik çağrıları gösterir. İlk çağrı özellik değerini ayarlar ve ikinci çağrı bunu alır.

fullName = "MyFirstName MyLastName"
MsgBox(fullName)

Ayrıca bakınız

  • Last updated on