1. Accueil
  2. Visual Basic / VB.NET
  3. Sources Visual Basic / VB.NET
  4. Sources Exécution
  5. Creer classes / fonctions .net pendant l'application / durant le fonctionnement / l'exécution de celle-ci (ou pour la créati

Creer classes / fonctions .net pendant l'application / durant le fonctionnement / l'exécution de celle-ci (ou pour la créati

Soyez le premier à donner votre avis sur cette source.

Vue 9 329 fois - Téléchargée 514 fois

Télécharger le projet
Commenter

Description

Ce code permet la création de classes et/ou de fonctions durant l'application, et ce en VB Net.
Tout est prévu pour pouvoir ajouter des générateurs de codes, vous pourrez donc en ajouter pour C#, J#, C++
Si vous ajoutez une fonction, n'hésitez pas à m'en faire part, que tout le monde puisse en profiter.

PS : Comme je n'ai que 14 ans, il est évident que le code peut encore contenir des petites fautes, j'attends vos remaques critiques avec impatience.

Source / Exemple : 


''' <sumary>
''' Voici un petit exemple pour illuster le fonctionnement du code.
''' Le code source se trouve dans le ZIP
''' </sumary>
''' <remarks>
''' N'hésitez pas à me faire part de vos remarques
''' </remarks>
Public Sub Tester()
        Dim CB As New VBClassBuilder("TestClass")
        CB.FreeContent = "'Ajouter ici du contenu libre à votre classe (events, ...)"
        CB.Add(New Method("New", New List(Of Argument), "Me.Message=""Hello"""))
        CB.Add(New Field("Message", GetType(String)))
        CB.Add(New Method("Test", New List(Of Argument), "MsgBox(Me.Message)"))
        Dim Args As New List(Of Argument)
        Args.Add(New Argument("Arg0", GetType(String)))
        CB.Add(New Method("Test2", Args, "Return Arg0", GetType(String)))
        Dim P As New [Property]("Test3", Nothing, "public", [Property].PropertyType.ReadOnly, Args)
        P.GetBody = "Return ""Hello2"""
        CB.Add(P)
        P = Nothing
        Args = Nothing
        Dim DynamicClass = CB.Create(Nothing).[New]
        CB = Nothing
        DynamicClass.Test() : MsgBox(DynamicClass.Test2(DynamicClass.Test3("")))
End Sub
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
276
Date d'inscription
jeudi 12 janvier 2006
Statut
Membre
Dernière intervention
22 décembre 2008
Voici un code de PowerShell VB.Net qui exploite au maximum cette fonction :
http://www.vbfrance.com/code.aspx?ID=41103
Messages postés
276
Date d'inscription
jeudi 12 janvier 2006
Statut
Membre
Dernière intervention
22 décembre 2008
De rien !
Messages postés
14852
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
26 janvier 2022
 160
Merci de ta réponse.
Messages postés
276
Date d'inscription
jeudi 12 janvier 2006
Statut
Membre
Dernière intervention
22 décembre 2008
J'ai tout developpé en .Net 2
Je n'ai aucune idée de la portabilité vers .Net 1 (ou 1.1)
Faudrait tester.

Je pense cepandant que rien n'est impossible à la conversion, bienque, en effet, il est possible que des modifications mineures doivent être apportée.
Messages postés
956
Date d'inscription
lundi 30 mai 2005
Statut
Membre
Dernière intervention
21 août 2014
 1
ok thx

Mais bon ça répond pas à ta question lol
Afficher les 14 commentaires
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (FREMYCOMPANY)