Discussion :

[thierry007]

Est il possible avec VB.NET d'appeler une form et lorsque je la decharge elle retourne une valeur.

Je m'explique:

je suis dans une form ou je demandes une impression, je souhaite passer par une fentre de paramètres que je retourne dans la form qui appel

mmmmmhhhh est-clair !

[More]

c'est vraiment pas clair, j'ai rien compris, tu peux detailler ton probleme ?

[thierry007]

Public Class FrmViewLanCLient


Private Sub BtnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnPrint.Click
ChoixImpressionLanCLient.Show() ' J'appelle la form de dialogue
...
...
J'imprime suivant le choix

End Sub

End Class




sur la form de dialogue, j'ai mes radioboutons
je fais un choix, et je dois retourner cette valeur dans la form appelante (FrmViewLanCLient) puis continuer le déroulement de la procédure

[Kelpan]

Tu créés un méthode dans ta class "ChoixImpressionLanCLient" qui va te permettre de renvoyer la valeur que tu désires

Exemple

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
 
Public Class ChoixImpressionLanCLient
 
 
' J'ai mis un énum, mais après c'est selon tes besoin
Enum ChoixImpression
  [Aucune] = 0
  [Choix1] = 1
  [Choix2] = 2
  .....
End Enum
 
' En privée dans la classe tu déclare une variable
' qui va contenir l'information à retourner
Private m_Choiximpression As ChoixImpression
 
' Fonction à appeler à la place de Show
Public Function ChoisirImpression() As ChoixImpression
 
  Select Case Me.ShowDialog
    Case DialogResult.Cancel
      Return ChoixImpression.Aucune
    Case DialogResult.OK
      Return m_ChoixImpression
    Case ...
      ...
  End Select
End Function 
 
Public Class FrmViewLanCLient
 
 
Private Sub BtnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnPrint.Click
 
  ' J'imprime suivant le choix
  Select case MonChoixImpressionLanCLient.ChoisirImpression() 
  Case ChoixImpression.Aucune
    ...
  Case ChoixImpression.Choix1
    ...
  End Select
 
End Sub
 
End Class

[thierry007]

qq modif et ajustement et sa a l'air ok

Merci