Discussion :

[nakata77]

Bonjour

je cherche une équivalence de vbModal et vbModeless en vb6 en vb.net

en vb je fais ça :


Sub Main()
frmPresentation.Show vbModal
frmMain.Show vbModeless
If frmMain.EtatFermeture = False Then
Unload frmMain
End If
End Sub

en vb.net quand je le migre ça me donne ceci :

'UPGRADE_WARNING: Application will terminate when Sub Main() finishes. Click for more: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="E08DDC71-66BA-424F-A612-80AF11498FF8"'

Public Sub Main()
frmPresentation.ShowDialog()
frmMain.Show()
If frmMain.EtatFermeture = False Then
frmMain.Close()
End If
End Sub




et donc la fenetre s'affiche pas
si vous avez des idées merciiii

[Mathieu Francesch]

Bonsoir,

Le message est juste un avertissement pour t'informer que l'application se termine dès que l'objet de démarrage (en l'occurence sub Main) est détruit. Ce qui veut dire que dès que toutes les instructions de ta sub seront effectuées ton application se terminera.

Pour résoudre ton problème, change juste ton objet de démarrage et mets frmMain. Pourquoi frmMain et pas frmpresentation ? Comme ton code est explicite, j'imagine que tu veux que frmpresentation s'affiche au chargement de ton application. Par conséquence fait de frmpresentation un splashscreen

Pour ce paramètrage, cliques droit sur ta solution et va dans "propriétés" ou double cliques sur My Project (J'ai une version anglaise)

Enfin pour répondre à ta question concernant les equivalences VBModal, VBmodeless et bien c'est tout simplement :
VBModal > showdialog()
VBModeless > show()

Lors de l'exécution de ton progamme quand tu dis que LA fenêtre ne s'affiche pas, veux tu parler de frmMain ? Si tel est le cas, elle attend juste la fermeture de frmpresentation.

Voilà j'espère que cela aura répondu à ta question.

[nakata77]

Merci :d