Lancer un formulaire à partir d'une case d 'un array

Version imprimable

Bonjour,

J ai un tableau de recherche. Je souhaiterais que lorsque l'utilisateur clique sur une des cases du tableau, qu'un formulaire s'ouvre. J 'ai testé le code ci dessous (qui évidement ne marche pas !!)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub dgv_lot_tab_lot_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv_lot_tab_lot.CellContentClick
        If dgvc_lot_numlot.Selected Then
            Lot_Presentation.lbl_lot_titreAMV.Text = "Fiche du lot"
            Lot_Presentation.txb_lot_qtelait.ReadOnly = False
            Lot_Presentation.txb_lot_datepast.ReadOnly = False
            Lot_Presentation.txb_lot_dateperime.ReadOnly = False
            Lot_Presentation.txb_lot_datearchi.ReadOnly = False
            Lot_Presentation.txb_lot_daterejet.ReadOnly = False
            Lot_Presentation.txb_lot_datedest.ReadOnly = False
            Lot_Presentation.txb_lot_qtelait.ReadOnly = False
            Lot_Presentation.Show()
        End If
    End Sub

dgv_lot_tab_lot correspond à mon tableau et dgvc_lot_numlot à la case à partir de laquelle je veux ouvrir un formulaire.
Comment pourrais je faire ??
merci d'avance

15/12/2009, 12h29
mactwist69

Salut,

Qu'est ce qui ne marche pas?

Quand tu cliques sur une case, rentres tu dans la fonction de l'évènement?
15/12/2009, 14h04
juzii

et bien quand je lance mon appli et que je clique sur la case en question de mon tableau il ne se passe rien. en meme temps on arrive pas vraiment "a cliquer" sur la case car, c'est une case qui doit juste contenir du texte , ce n'est pas un bouton ou un lien. donc je ne vois pas comment faire
15/12/2009, 14h49
Pol63

c'est faisable mais faudrait décrire un peu plus

tu parles de lancer un formulaire, et dans ton code je ne vois pas d'instanciation de fenetre ...

on imagine que Lot_Presentation doit etre un form mais tu ne nous montres pas le code qui le décrit, et en théorie les objets ont un nommage qui permet juste en le voyant de savoir ce que c'est (genre prefixe FRM pour les forms, BTN pour les boutons etc...)

alors je sais pas si c'est ca exactement que vous voulez : il s'agit du code de création du tableau du formulaire presentation.

Code:

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
 
'
        'dgv_lot_tab_lot
        '
        Me.dgv_lot_tab_lot.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.dgv_lot_tab_lot.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.dgvc_lot_numdonneuse, Me.dgvc_lot_numlot, Me.dgvc_lot_statut, Me.dgvc_lot_datepast, Me.dgvc_lot_qtélait, Me.dgvc_lot_nbrbiberon})
        Me.dgv_lot_tab_lot.Location = New System.Drawing.Point(62, 286)
        Me.dgv_lot_tab_lot.Name = "dgv_lot_tab_lot"
        Me.dgv_lot_tab_lot.Size = New System.Drawing.Size(864, 242)
        Me.dgv_lot_tab_lot.TabIndex = 9
        '
        'dgvc_lot_numdonneuse
        '
        Me.dgvc_lot_numdonneuse.HeaderText = "Numéro donneuse"
        Me.dgvc_lot_numdonneuse.Name = "dgvc_lot_numdonneuse"
        Me.dgvc_lot_numdonneuse.Width = 150
        '
        'dgvc_lot_numlot
        '
        Me.dgvc_lot_numlot.HeaderText = "Numéro lot"
        Me.dgvc_lot_numlot.Name = "dgvc_lot_numlot"
        Me.dgvc_lot_numlot.Width = 120
        '
        'dgvc_lot_statut
        '
        Me.dgvc_lot_statut.HeaderText = "Statut"
        Me.dgvc_lot_statut.Name = "dgvc_lot_statut"
        '
        'dgvc_lot_datepast
        '
        Me.dgvc_lot_datepast.HeaderText = "Date pasteurisation"
        Me.dgvc_lot_datepast.Name = "dgvc_lot_datepast"
        Me.dgvc_lot_datepast.Width = 150
        '
        'dgvc_lot_qtélait
        '
        Me.dgvc_lot_qtélait.HeaderText = "Quantité lait"
        Me.dgvc_lot_qtélait.Name = "dgvc_lot_qtélait"
        Me.dgvc_lot_qtélait.Width = 150
        '
        'dgvc_lot_nbrbiberon
        '
        Me.dgvc_lot_nbrbiberon.HeaderText = "Nombre biberon"
        Me.dgvc_lot_nbrbiberon.Name = "dgvc_lot_nbrbiberon"
        Me.dgvc_lot_nbrbiberon.Width = 150

15/12/2009, 16h15
Pol63

pour ouvrir une fenetre, il faut l'instancier et faire .show dessus

http://plasserre.developpez.com/cours/vb-net/
15/12/2009, 16h47
juzii

le pbk ne vient de comment l'ouvrir , je connais la fonction show, c'est que je n'arrive pas a creer un lien sur une cellule de mon tableau vers le formulaire que je veux lancer.

Je veux que qd l'utilisateur clique sur cette case du tableau, nommé dgvc_lot_numlot (qui est de type dataGridViewCell) le formulaire se lance. et ds vb pour les dataGridViewCell il ne propose pas de fonction qui semblerait correspondre a ceux que je veux. j ai essayé le : dgvc_lot_numlot.Selected mais ca ne fonctionne pas
15/12/2009, 16h55
Pol63

.currentcell te donne la cellule sélectionnée
15/12/2009, 17h52
juzii

question qui n a rien avoir avec le sujet :lol:
en fait on bosse a 4 sur le projet et on utilise un systeme de subversion pour se passer les fichiers.

et la suite à des erreurs de conflits de version de fichier (que l on a résolu) on a 9 avertissements qui sont apparus ds vb :

Citation:

Avertissement 1 La variable 'VB$t_ref$L0' n'est pas déclarée ou n'a jamais été assignée.

ca veut dire quoi??

et sinon pour mon histoire de tableau j y suis presque maintenant qd je clique sur le tableau le formulaire se lance :ccool: il me reste plus qu à préciser qu'il se lance qu'à partir d'une cellule en particulier