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 201 fois - Téléchargée 504 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

Signaler
Messages postés
278
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
Signaler
Messages postés
278
Date d'inscription
jeudi 12 janvier 2006
Statut
Membre
Dernière intervention
22 décembre 2008
De rien !
Signaler
Messages postés
14669
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
5 juin 2020
 143
Merci de ta réponse.
Signaler
Messages postés
278
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.
Signaler
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)