utilisation incorrect du mot clef newRésolu

Question

Bonjour,

J'ai un problème dans access pour l'instantiation d'un type personnalisé.

J'ai écrit :
Public Type MyType
    AA As String
End Type

Puis au clique d'un bouton, j'invoque le code suivant :

    Dim a As MyType
    a = New MyType

J'obtiens l'erreur suivante :
utilisation incorrect du mot clef new. Pourquoi ?

Je peux par contre écrire
    Dim a As MyType

    a.AA = "jdvklfd"

il semble donc qu'il ne soit pas possible d'instantier un type personnalisé. Ou alors il faut lui définir un constructeur ? Quelle serait la syntaxe ?

Mathmax

****************************************http://www.postsharp.org/

PCPT · Accepted Answer

parce qu'en VB6 et VBA c'est Set a = Nothing

jmfmarques · Answer

Bonjour

MyType est ici une structure.

Dim a as MyType confère à a la structure définie pour MyType
a n'a pas à faire l'objet d'une "instanciation" autre, par "a = New...."

cs_mathmax · Answer

Comment faire une classe en vba ?

Mathmax

****************************************http://www.postsharp.org/

PCPT · Answer

salut,

pour ton exemple tu n'as pas besoin de classe

mais sinon, tu ajoutes une classe à ton projet, nommée MyType
elle contiendra juste :
Public AA As String

et là alors tu pourras l'initialiser par :
    Dim a As New MyType
    a.AA = "jdvklfd"

PS : attention au thème, VBA n'est pas VB6, voir "VB6\langages dérivés\VBA"
++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

cs_mathmax · Answer

Merci mais ça ne marche pas.

J'ai insérer un module de classe. Ca m' a créer une classe Classe1. Mais quand j'execute ça plante sur 

a = New Classe1

le message est "Variable objet ou variable bloc With non définie". Une idée du problème ?

Pardon pour le thème.
Mathmax

****************************************http://www.postsharp.org/

PCPT · Answer

où as-tu lu a = New Classe1 ?????

cs_mathmax · Answer

http://www.cpearson.com/excel/Classes.aspx

Mathmax

****************************************http://www.postsharp.org/

PCPT · Answer

effectivement si après tu lis mal ^^ sans méchanceté "Dim C As Class1 Set C = New Class1" donc comme j'ai inqué : Dim a As New MyType a.AA = "jdvklfd" et si vraiment tu ne veux pas mettre NEW de suite, alors : Dim a As ~~New~~ MyType Set a = New MyType a.AA = "jdvklfd" ce qui te fait une ligne de plus pour rien...

Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

cs_mathmax · Answer

D'accord. Et pourquoi on ne peut pas faire 
set a = null

Mathmax

****************************************http://www.postsharp.org/

cs_mathmax · Answer

Désolé, je viens de c#... j'ai un peu du mal.

Merci beaucoup.
Mathmax

****************************************http://www.postsharp.org/

Utilisation incorrect du mot clef new

10 réponses

Votre réponse

Discussions similaires