ComClass

Résolu
Signaler
Messages postés
218
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
11 juillet 2010
-
Messages postés
381
Date d'inscription
vendredi 24 septembre 2004
Statut
Membre
Dernière intervention
5 septembre 2010
-
Salut!

 -J'ai crée une classe pour VB6 avec VB.net voila avec VB.net:

<ComClass(ComClass1.ClassId, ComClass1.InterfaceId, ComClass1.EventsId)> _
Public Class ComClass1
    <Microsoft.VisualBasic.ComClass()> Public Class moi

        Public Sub encore_moi(ByVal le_premier_moi As String, ByVal le_deuxiéme_moi As String, ByVal vouloir As String)
            le_premier_moi = vouloir & " " & le_deuxiéme_moi & "www.vbfrance.com"
        End Sub

    End Class

-Je l'ai compilé puis avec VB6 , j'ai inséré une textbox nommé "a" voila le code:

       Dim z as new ComClass1.moi
a.text=z.encore_moi "vouloir","ça "

-Mon probléme c'est que rien ne s'affiche dans la textbox "a", quelle est mon errure?

-Merci

8 réponses

Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
lol, oui mais ça ne suffit pas quand même car une fonction ne sert à ren si tu ne lui dit pas de retrouner quelque chose

ComClass(ComClass1.ClassId, ComClass1.InterfaceId, ComClass1.EventsId)> _
Public Class ComClass1
    <Microsoft.VisualBasic.ComClass()> Public Class moi

        Public Function encore_moi(ByVal le_premier_moi As String, ByVal le_deuxiéme_moi As String, ByVal vouloir As String) as String
            Return vouloir & " " & le_deuxiéme_moi & "www.vbfrance.com"
        End Sub

    End Class

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
Dans ta classe, et plus précisément dans la méthode encore_moi, réfléchie bien à savoir ou, comment et à quel moment tu retourne une valeur.

Regarde bien ton code, moi je vois pas de retour.

Sans retour pas d'affichage possible

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php
Messages postés
218
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
11 juillet 2010

Comment faire un retour ? dans moi le syntaxe
Messages postés
218
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
11 juillet 2010

Comment faire un retour ? dans moi le un exemple.
Messages postés
381
Date d'inscription
vendredi 24 septembre 2004
Statut
Membre
Dernière intervention
5 septembre 2010
3
Salut,
Avec une sub, tu n'y arrivera pas : il te faut une fonction espérer un retour :

ComClass(ComClass1.ClassId, ComClass1.InterfaceId, ComClass1.EventsId)> _
Public Class ComClass1
    <Microsoft.VisualBasic.ComClass()> Public Class moi

        Public Function encore_moi(ByVal le_premier_moi As String, ByVal le_deuxiéme_moi As String, ByVal vouloir As String) as String
            le_premier_moi = vouloir & " " & le_deuxiéme_moi & "www.vbfrance.com"
        End Sub

    End Class

 Fiko ;-)

La reponse vous convient pensez > Accepter <
<hr />
Messages postés
218
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
11 juillet 2010

Désolé, ça marche pas
Messages postés
218
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
11 juillet 2010

Merci
Messages postés
381
Date d'inscription
vendredi 24 septembre 2004
Statut
Membre
Dernière intervention
5 septembre 2010
3
oulalala
Je crois que je vais allez me reposer...
Casy ne m'en veux pas

 Fiko ;-)

La reponse vous convient pensez > Accepter <
<hr />