1 | PROPERTY Name AS STRING USE $sName '<------------------------- en une seule ligne de code nous définissons la propriété et la valeur qui récupère celle-ci |
1 2 | PROPERTY Name AS STRING ' <--------------------------------------------- déclaration de la propriété |
1 2 3 | PRIVATE SUB Name_Read() AS STRING ' <------------------------------ lecture de la valeur de la propriété |
1 2 3 | PRIVATE SUB Name_Write(Value AS STRING) ' <---------------------- écriture de la valeur de la propriété |