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

Bir özellik tanımını deyimiyle PropertyEnd Property deyimi arasına alırsınız. Bu tanımda bir Get yordam, yordam Set veya her ikisini de tanımlarsınız. Özelliğin tüm kodu bu yordamlarda 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.

Özellik oluşturmak için

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

  2. özelliği parametre alıyorsa, yordamın Property adıyla anahtar sözcüğünü ve ardından parametre listesini parantez içinde izleyin.

  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. Uygun şekilde ve Set yordamları ekleyinGet. Aşağıdaki yönergelere bakın.

Özellik değeri alan bir Get yordamı oluşturmak için

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

  2. ve End Get deyimleri arasında 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. Salt yazma özelliği için bir Get yordam tanımlamamalısınız.

Ö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. deyiminde Set , isteğe bağlı olarak parantez içinde parametre listesiyle anahtar sözcüğünü izleyin Set . Parametre listesi yoksa veya boşsa, türü özelliğin türü olan adlı Value ö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 End Set deyimleri arasında 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 yordam yazmanız Set gerekir. Salt okunur bir Set özellik için yordam 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. Çağıran kod okuduğundafullNameGet, yordam iki kurucu adı birleştirir ve tam adı döndürür. Çağıran kod yeni bir tam ad atadığında, Set yordam bunu iki kurucu ada bölmeye çalışır. Bir alan bulamazsa, tümünü 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, özelliği yordamlarına yapılan tipik çağrıları fullNamegösterir. İlk çağrı özellik değerini ayarlar ve ikinci çağrı bunu alır.

fullName = "MyFirstName MyLastName"
MsgBox(fullName)

Ayrıca bkz.