Module de Classe / Propriétés / Proposer des valeurs par défaut

Question

Bonjour,

je pense que le titre de ma question est assez explicite :) je voudrais savoir comment peut-on faire lorsque l'on d&#233;fni une propri&#233;t&#233; d'un objet pour faire en sorte que lors de la programmation au niveau du module, la liste d&#233;roulante propose les valeurs possibles de la propri&#233;t&#233;

Merci d'avancee ! ! !

Renfield · Answer

il faut utiliser une enum&#233;ration

public enum CouleurConstants
   Red
   Green
    Blue
End Enum

Renfield
Admin CodeS-SourceS - MVP Visual Basic

cs_Jack · Answer

Petite pr&#233;cision : Je crois qu'il n'est pas possible de d&#233;finir des types ou des variables en Public dans une Classe.
Il te faudra donc ajouter un Module &#224; ton projet dans laquelle tu mettras cette/ces d&#233;clarations.

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

zavier666 · Answer

Losrque je met ce code dans un module de classe 

Public Enum ReponseType
    Reponse1 = 0
    Reponse2 = 1
End Enum


Property Let MaProriete(ByVal MonParam As Integer) As ReponseType


Select Case MonParam
    Case 0
        MaPropriete = valeur1
    Case 1
        MaPropriete = valeur2
End Select
End Property

j'ai une erreur de compilation sur Property Let

cs_DARKSIDIOUS · Answer

Il faut sp&#233;cifier la port&#233;e : Public ou Private ou Friend

_

PCPT · Answer

Salut,  

Property Let MaProriete(ByVal MonParam As Integer) As ReponseType

c'est en quoi &#231;&#224;?!



mis &#224; par le Public manquant comme le dit DarkSidious, les propri&#233;t&#233;s ne se d&#233;clarent pas comme &#231;&#224; (&#224; ma connaissance du moins...)



Public Property Get MaPropriete () As ReponseType

Public Property Let MaPropriete (MonParam As ReponseType) 'et rien ici



ps : Jack -> enum public on peut. et pour le type on peut bidouiller sans module si la classe est en projet activeX (j'ai r&#233;ussi une fois par hasard ^^)



++

PCPT  [AFCK]

Module de Classe / Propriétés / Proposer des valeurs par défaut

5 réponses

Discussions similaires