Sub dans un module

Résolu
xxxinconitoxxx Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   -  
xxxinconitoxxx Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   -
Bonjours,

Je suis en train de développer une application en vb.net (visual basic 2010) où je doit utiliser plusieurs fois le même chemin d'accès dans différentes form, je me suis dit que j'allais mettre les différentes ressources que j'avais besoin plusieurs fois dans un module, j'ai donc créer un module nommé "includes.vb" où j'ai ajoutés les différents sub.

Mon code pour accéder au variable (
Public Dim APP_NAME As String = "Application"
) est par exemple :

MsgBox(APP_NAME)


Ça me renvois cette erreur :

Une exception a été levée par l'initialiseur de type pour '[Nom De Mon Application].includes'.


J'ai déjà effectuer des recherches, sans succès.

Je vous demande de l'aide pour savoir si vous avez une solution, merci d'avance.

2 réponses

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
0
xxxinconitoxxx Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   166
 
Merci de ta réponse, je regarde ça tout de suite et je modifie après.

Edit :

Bon moi et l'Anglais sa fait deux, je pense que je vais passer par un fichier texte pour enregistrer les différents paramètres modifiable par l'utilisateur, donc en plus à chaque mise à jour du logiciel, celui-ci pourra garder ses paramètres.

Je ne vois pas comment faire autrement et puis je préfère faire comme sa avec un système de chargement des paramètres et une sauvegarde.

Et encore merci de ta réponse !
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
J'avais fait il y a quelques années un programme pour sauvegarder des valeurs dans un fichier texte ou dans les paramètres de l'application (Allez dans My Project en haut à droite et Paramètres)
Cela te donnera des idées:

https://codes-sources.commentcamarche.net/source/51785-memoriser-valeur
0
xxxinconitoxxx Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   166
 
Oui j'utilise en faite, les paramètres (My.settings ...) mais lors qu'une mise à jour, j'écrit tous ces paramètres dans un fichier texte provisoire et je le lis à la fin lors du lancement de la nouvelle version pour les remettres, je pense que s'est assez propre comme sa

J'utilise ça pour enregistrer, il y a peut être mieux mais sa marche ^^
Accueil.Writer.WriteLine("version_app = " + My.Settings.version_app)


Writer est un StreamWriter

J'apelle "Accueil" car j'ai mis mes variables en "public" je n'ai pas encore tester mais je suppose que sa va marcher ^^

PS : J'ai aussi une question, j'utilise la même fenêtre pour l'installation & la mise à jour donc pour mettre soit "Mise à jour", soit "Installation" j'utilise une variable :

    Public Sub INSTALL_APP(ByVal TYPE As String)
Install.Show()
Install.Text = TYPE + APP_NAME
Install.InstallButton.Text = TYPE + APP_NAME + " v" + APP_VERSION
My.Settings.new_version_app = ""
Me.Close()
End Sub


Je l'appelle comme sa :
INSTALL_APP(TYPE:= "Installer "

Et sur cette ligne* ça me renvois une erreur :
La conversion de la chaîne "Installation Diamond Server v" en type 'Double' n'est pas valide.


As tu une idée de quoi sa peut venir ?

Merci pour toute l'aide que tu donne.
  • Install.InstallButton.Text = TYPE + APP_NAME + " v" + APP_VERSION
0