Discussion :

[AllyKo]

Bonjour,

je n'ai pas trouvé de sujet similaire au mien, je vous poste donc mon petit problème du moment...

Je souhaiterais ouvrir une Form (disons maForm.vb) à partir d'une variable :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
        dim a as String
        a = "F" + tab(1) + ".vb"

donc a correspondrais au nom complet de la Form il ne manque plus que le lien entre la classe Form et la classe String.

Je souhaite éviter une fonction qui va tester si a.Text().equals("telleFenetre") alors ouvrir telleFenetre...

Merci

[Pol63]

il y a plusieurs méthodes pour faire ca (enfin pas exactement ca, car après compilation il n'y a plus de notion de .vb)
mais je préfèrerais en savoir plus sur d'où vient la variable qui te dit quelle fenetre tu va ouvrir, car il y a surement une méthode de codage plus propre

[AllyKo]

Salut,

Ben ma variable viendrait d'une base de donnée (d'un datareader).

Ce que je souhaite c'est qu'en fonction du résultat de la requête j'ouvre telle ou telle fenêtre.

Ou sinon :

j'ai dans ma base de données une table X avec deux colonnes exercice et vbForm qui fait donc le lien entre l'exercice et la form associée.
Récupérer le nom de la form dans la base de donnée --> pas de problème.

Mais l'étape juste après, c'est à dire de "parser" le String que j'obtiens dans la base en Form est une difficulté que je n'arrive pas à passer

Merci pour tes idées

[Pol63]

il y a plusieurs moyens d'instancier une classe en connaissant juste son nom

en voici une :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim f As Form = Directcast(System.Activator.CreateInstance(System.Type.GetType("Form1", True, True)),Form)
f.show

[AllyKo]

Je testerais quand je serais dans mon environnement de développement

merci

[AllyKo]

euh
il me dit tout simplement qu'il ne peut pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Impossible de charger le type 'FForm1' à partir de l'assembly 'MecaTest, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null'.

utilisation de ta source :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Dim f As Form = DirectCast(System.Activator.CreateInstance(System.Type.GetType("FForm1", True, True)), Form)
        f.Show()

une idée ?

[Pol63]

ca dépend aussi du namespace il faut le type complet "namespace(s).FForm1"
par défaut il y en a un sur l'appli (voir dans paramètres du projet)

[AllyKo]

Par défaut, le namespace est My
mais j'ai retrouvé mon nameSpace de l'application

donc je devrais écrire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Dim f As Form = DirectCast(System.Activator.CreateInstance(System.Type.GetType("monNameSpace.FForm1", True, True)), Form)
        f.Show()

ça marche impec

merci