Postupy: Vytvoření vlastnosti (Visual Basic)
Uzavřete definice vlastností mezi Property prohlášení a End Property prohlášení.Této definice, definovat Get postupem, Set postup nebo obojí.Všechny vlastnosti kódu leží v rámci těchto postupů.
Get Postup načte hodnotu vlastnosti a Set postupu ukládá hodnotu.Jestliže chcete vlastnost přístup pro čtení i zápis, je nutné definovat obou postupů.Pro vlastnost jen pro čtení, můžete definovat pouze Get, a pro vlastnost jen pro zápis, můžete definovat pouze Set.
Vytvořit vlastnost
Mimo vlastnost nebo proceduru, použijte Property – příkaz, následuje End Property prohlášení.
Pokud vlastnost parametry, postupujte Property klíčové slovo s názvem postup a potom v seznamu parametrů v závorkách.
Postupujte podle závorek se As klauzuli určete datový typ hodnotu vlastnosti.Je nutné zadat typ dat pro vlastnost jen pro zápis.
Přidat Get a Set postupy podle potřeby.Viz následující pokyny.
Vytvořit postup Get, který načte hodnotu vlastnosti
Mezi Property a End Property příkazy zápisu Get – příkaz, následuje End Get prohlášení.Není nutné definovat parametry pro Get postup.
Příkazy kódu načíst hodnotu vlastnosti mezi umístit Get a End Get příkazy.Tento kód můžete zahrnout další výpočty a manipulaci ke generování a vrací hodnotu vlastnosti.
Použití Return prohlášení vraťte hodnotu vlastnosti volající kód.
Musíte napsat Get postup pro vlastnost pro čtení a zápis a vlastnosti určené jen pro čtení.Nutné definovat Get postup pro vlastnost jen pro zápis.
Vytvořit sadu postup, zapíše hodnota této vlastnosti
Mezi Property a End Property příkazy zápisu Set – příkaz (Visual Basic), následuje End Set prohlášení.
V Set prohlášení, postupujte Set klíčové slovo s seznam parametrů v závorkách.Tento parametr seznam musí obsahovat nejméně jeden parametr hodnota pro hodnota předaná volající kód.Výchozí název pro tento parametr hodnota je Value, ale v případě potřeby můžete použít jiný název.Parametr Hodnota musí mít stejný datový typ jako vlastnost sám.
Příkazy kódu k uložení hodnoty vlastnosti mezi umístit Set a End Set příkazy.Tento kód můžete zahrnout další výpočty a manipulaci, ověření a ukládání hodnotu vlastnosti.
Pomocí parametru hodnota přijmout hodnotu poskytnutých volající kód.Můžete hodnotu přímo v příkazu přiřazení nebo použít ve výrazu pro výpočet vnitřní hodnoty uloženy.
Musíte napsat Set postup vlastnost pro čtení a zápis a vlastnost jen pro zápis.Nutné definovat Set postup pro vlastnost jen pro čtení.
Příklad
Následující příklad vytvoří vlastnost pro čtení i zápis, která ukládá jméno dvou základních jmen, křestní jméno a příjmení.Pokud volající kód čte fullName, Get postupu spojuje dva názvy základních a vrátí úplný název.Pokud volající kód přiřadí nový úplný název Set postup pokusí rozdělit do dvou základních názvy.Pokud nenajde místo, uloží jej všechny jako křestní jméno.
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
Následující příklad ukazuje typické vlastnosti postupy volání fullName.První volání nastaví hodnotu vlastnosti a ji načte druhé volání.
fullName = "MyFirstName MyLastName"
MsgBox(fullName)
Viz také
Úkoly
Postupy: Deklarace vlastnosti se smíšenými úrovněmi přístupu (Visual Basic)
Postupy: Volání procedury vlastnosti (Visual Basic)
Postupy: Deklarace a volání výchozí vlastnosti v jazyce Visual Basic
Postupy: Vložení hodnoty do vlastnosti (Visual Basic)
Postupy: Získání hodnoty z vlastnosti (Visual Basic)
Koncepty
Procedury v jazyce Visual Basic
Procedury vlastnosti (Visual Basic)