Discussion :

[GarsDuCalvados]

Bonjour,
je commence juste à developper sous Visual Studio.
Je m'exerce avant de commencer à developper une application.

Voilà je me suis créé une BDD toutes simple sur mon SRV SQL SERVER.
J'ai déjà réussi à afficher les informations d'une table dans un datagrind.
Maintenant je voudrais choisir dans une liste déroulante le numéros du cours et cliquer sur un boutton afin que dans le formualire ou il y a le datagrind s'affiche que les élèves participant à ce cours.

La liste déroulante récupere bien les informations dans la BDD je peux le choisir mais c'est la transition entre les deux formulaire qui me pose un problème.

Merci de votre aide,
.Matthieu

[JPelli]

bonjour,
Pour communiquer entre les formulaires :
Solution 1
utiliser des variables globales(à éviter)
Solution 2
Ajouter des propriétés personnalisées au formulaire

Code :

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

1
2
3
4
5
6
7
8
9
 Dim Pmaprop As String          'propriété 
...
    Public Property PMaPropS() As String
    Get
      PmapropS = Pmaprop
    End Get
    Set(ByVal value As String)
      Pmaprop = value
    End Set

Solution 2 de préférence
Bon boulot Jean

[Pol63]

sur form2 tu peux aussi faire un public sub new (param as machin)
et sur form1 faire dim a as new form2(paramliste)

[GarsDuCalvados]

Merci pour vos informations.
Mais en fait j'ai décidé de commencer par autre chose avant d'entamer la trasition.
Je veux afficher par le biais d'un bouton les informations sur le cour que j'ai selectionné dans la ListBox.
Le hic c'est que je n'arraive pas à recuperer le nom du cours c'est à dire le libellé, et le numéros. En fait je ne récupere que l'indice du libellé dans la TextBox (de 0 à n COURs) et non le numéros.

Voici le code d'affichage de la MessageBox :

Code :

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

1
2
3
4
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MessageBox.Show("Le cour choisi est :" & cours.SelectedItem.ToString & "," & cours.SelectedIndex & ".", "Affichage cour", MessageBoxButtons.OK, MessageBoxIcon.Information)
 
    End Sub

Merci,
.Matthieu