De eigenschap Standaard bouwen in Visual Basic is een klasse of datastructuur die toegankelijk is voor uw programma zonder vermelding van het. Toegang krijgen tot een klasse woning normaliter wordt verlangd dat de verklaring van het programma geeft u de naam van de eigenschap . Bijvoorbeeld , om toegang te krijgen tot het pand myMessage in de SendMessage klasse , de verklaring zou worden geschreven als SendMessage.myMessage . Als myMessage wordt verklaard als een standaard woning , wordt dezelfde oproep gedaan zonder vermelding van de naam van de eigenschap , zoals SendMessage ( someMessage ) . Dit construct moeten met mate worden gebruikt als het heeft de potentie om gebruikers van uw klas die onbekend zijn met de standaard gereedschappen en gebruik te verwarren. Instructies 1 Verklaren het pand als een deel van je klas definitie zoals je normaal zou doen . Het pand moet Openbare toegankelijkheid , dus je moet geen gebruik maken van de gedeelde of prive zoekwoord in de verklaring . Als voorbeeld wordt de eigenschap XXXX als volgt verklaard : Property myMessageString As String kopen van 2 In de Standaard sleutelwoord om de verklaring , voorafgaand aan de Property trefwoord . Het voorbeeld verklaring wordt als volgt gelezen : Standaard Woning myMessageString als Koord 3 Voeg een minimum van een parameter om het pand verklaring . Een standaard eigenschap moet ten minste een argument. Voeg een lijst met argumenten om het voorbeeld als volgt : Standaard Woning myMessageString ( ByVal index As Integer ) As String 4 Schrijf Get en Set pand procedures om de toegang tot de opgeslagen gegevens kunnen waarden . De procedures zijn geschreven tussen de ondertekening Eigendom en de End Property statement . De Get procedure wordt aangeroepen als de waarde van de accommodatie wordt opgehaald . De Set procedure slaat de ontvangen door de waarden van het bezit . De Get procedure voor het voorbeeld is heel eenvoudig , het lezen : Krijg Return myTextStrings ( index ) End of Get De set is even simpel als het de waarden opslaat op een klasse -array : Stel myTextStrings ( index ) = Waarde End of Set < br > |