afficher form a partir datagridview

Version imprimable

Bonjour
Je veux si j'écris un point d'interrogation et je clique la bouton entrée du clavier dans la premier colonne du datagridview et quelque soit la ligne le form2 s'affiche.le code si dessous foctionne mais regardez le if(Dg.Rows(1),Dg.Rows(2),Dg.Rows(3)...) jusqu'à 30 qui n'est pas du tous une solution d'effectuer 30 conditions.
Merci de m'aider a le faire pour toutes les lignes.
Code:

1 2 3 4 5 6 7 Private Sub entre_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Dg.KeyUp If e.KeyCode = Keys.Enter Then If Dg.Rows(0).Cells(0).Value = "?" Or Dg.Rows(1).Cells(0).Value = "?" Dg.Rows(2).Cells(0).Value = "?" Dg.Rows(3).Cells(0).Value = "?" Then form2.Show() End If End If End Sub

21/03/2011, 16h51
Gurdil le nain

Salut,

Essayes de voir du côté de la propriété SelectedRows.
21/03/2011, 23h15
oami89

Citation:

Envoyé par Gurdil le nain

Salut,

Essayes de voir du côté de la propriété SelectedRows.

J'ai pas trouvé une solution avec cette propositon aidez moi je suis débutant.

J'ai trouvé un solution

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub entre_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Dg.KeyUp
 
        Dim i As Integer = 0
 
        If e.KeyCode = Keys.Enter Then
            Do
 
                If Dg.Rows(i).Cells(0).Value = "?" Then
 
                    Dialogarticle.Show()
                    Exit Do
                Else : i = i + 1
                End If
 
            Loop While i < 25
 
        End If
 
 
 
    End Sub

Il y a quand même vachement plus simple.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Private Sub entre_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Dg.KeyUp 
 If e.KeyCode = Keys.Enter Then
            If Dg.SelectedCells.Count = 1 Then
 
                If Dg.SelectedCells.Item(0).Value = "?" Then
 
                     Dialogarticle.Show()
 
                End If
 
            End If
 
        End If
End Sub

Citation:

Envoyé par Gurdil le nain

Il y a quand même vachement plus simple.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Private Sub entre_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Dg.KeyUp 
 If e.KeyCode = Keys.Enter Then
            If Dg.SelectedCells.Count = 1 Then
 
                If Dg.SelectedCells.Item(0).Value = "?" Then
 
                     Dialogarticle.Show()
 
                End If
 
            End If
 
        End If
End Sub

Merci mais ton proposition ca ne marche pas.

22/03/2011, 10h27
Gurdil le nain

Alors c'est qu'il y a un soucis au niveau de l'évènement...regarde en pas à pas (déboggeur) si tu passes dans la fonction après l'appuie sur entrée.
22/03/2011, 10h30
oami89

ca ne marche pas
22/03/2011, 10h53
Gurdil le nain

Regardes si l'évènement CellValidated peut te convenir.