Bonjour,
J'ai ça dans mon Form1.designer.vb:
Friend WithEvents frm As Form2
et dans Form1.vb :
1 2 3 4 5 6 7 8 9
| Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If (Me.frm Is Nothing) Then
Me.frm = New Form2()
'Me.frm.Show()
'Me.frm.Visible=false
End If
End Sub |
Form2 dés qu'il est affiché en invisible comment il faudrait faire pour qu'il affiche un msgbox de n'importe quel Sub ou autre.
(j'ai testé Form2.visible = false et c'est pas efficace une fenêtre clignotte sur l'ecran c'est sale)
Merci , salutations.
Partager