Aidez moi pour mon prog!

salut tout le monde voila je me suis fait un prog et jai fais une rubrique definition malheuresement

mes definition sont trop grosse a ecrire dans le code voila mon code

Private Sub Combo1_Click() Select Case Combo1.Text Case "SFR" Text1.Text = "" End Select End Sub Private Sub Form_Load() Combo1.AddItem "SFR" End Sub

voila je me voit mal ecrire une centaine de ligne ici alors je voudrai savoir si on pouvait faire apparaitre sur le text1 de mon prog la def avec un fichier txt???
Jsuis un NooB (Pour linstant )

Voici un exemple pour un fichier txt contenant la definition

Dim Texte as string Open "MonFichier.txt" for binary as #1 Texte=space(lof(1)) get #1,,Texte close #1 Texte1=Texte

@+

E.B.