|
Objectif
Créer un type de variable personnalisé ayant des propriétés paramétrables selon notre besoin
Utilisation
Nous utilisons la fonction Type qui nous permet cette création, ensuite nous affectons notre type
à une ou plusieurs variable, de la manière que les types traditionnels (Integer, Long,...)
Exemple :
Public Type Stagiaire 'debut déclaration du type et de son nom
' création des propriétés
Nom As String * 30
Prenom As String * 25
DateNaissance As Date
NumStagiaire As Integer
Section As String * 5
End Type
' déclaration d'une variable de type stagiaire
Public Stag As Stagiaire
Note : La longueur d'une variable de type stagiaire est égale à la somme de la longueur de
ses propriétés, soit dans notre exemple : 30 + 25 + 4 (date) + 2(integer) + 5 : 66 octets
Utilisation de la variable déclarée : Nous pouvons remarquer que l'intellisense
nous propose les propriétés de la variable
Sub TestUtilisationType()
Stag.DateNaissance = #12/21/2000#
Stag.Nom = "Durand"
Stag.Prenom = "Toto"
Stag.NumStagiaire = 120
Stag.Section = "TG120"
End Sub
|
