Bonjour à tous,

Sur un form tout bête, j'ai ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Adm_USERDataGridView_CellValidated(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles Adm_USERDataGridView.CellValidated
        If Not IsDBNull(Me.Adm_USERDataGridView.CurrentCell.Value) Then
            If Me.Adm_USERDataGridView.Columns(e.ColumnIndex).HeaderText = "Login" Or Me.Adm_USERDataGridView.Columns(e.ColumnIndex).HeaderText = "Nom" Then
                Dim st As String = Me.Adm_USERDataGridView.CurrentCell.Value
                st = st.ToUpper
                Me.Adm_USERDataGridView.CurrentCell.Value = st
            End If
            If Me.Adm_USERDataGridView.Columns(e.ColumnIndex).HeaderText = "Prénom" Then
                Dim st As String = Me.Adm_USERDataGridView.CurrentCell.Value
                st = StrConv(st, VbStrConv.ProperCase)
                Me.Adm_USERDataGridView.CurrentCell.Value = st
            End If
        End If
    End Sub
qui permet juste de mettre Login et Nom en majuscules et de mettre une majuscule à la première lettre du prénom.

Sur le bouton Exit de mon form, je teste le dataset.haschanges... Or, systématiquement, juste en ouvrant/fermant ce form, sans faire de modif ou de saisie, le haschanges=true!

Bizarrement, la sub est appelée à l'ouverture du form...
Pour tester, j'ai mis un msgbox avec dataset.haschanges.tostring avant et après la partie active du code de la sub, j'ai False dans les deux cas. Mais le problème vient bien de cette sub, si je l'enlève, je n'ai plus le haschanges=true... Bizarre, vous dites...?

Voyez-vous?

Merci d'avance!

Amicalement,

JFB