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 425 fois - Téléchargée 527 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
FREMYCOMPANY Messages postés 276 Date d'inscription jeudi 12 janvier 2006 Statut Membre Dernière intervention 22 décembre 2008
9 févr. 2007 à 22:05
Voici un code de PowerShell VB.Net qui exploite au maximum cette fonction :
http://www.vbfrance.com/code.aspx?ID=41103
FREMYCOMPANY Messages postés 276 Date d'inscription jeudi 12 janvier 2006 Statut Membre Dernière intervention 22 décembre 2008
16 mai 2006 à 20:15
De rien !
NHenry Messages postés 15032 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 26 janvier 2023 156
16 mai 2006 à 10:10
Merci de ta réponse.
FREMYCOMPANY Messages postés 276 Date d'inscription jeudi 12 janvier 2006 Statut Membre Dernière intervention 22 décembre 2008
15 mai 2006 à 20:31
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.
cs_eldim Messages postés 956 Date d'inscription lundi 30 mai 2005 Statut Membre Dernière intervention 21 août 2014 1
15 mai 2006 à 14:01
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)