Aide vb.net et access

karimi94 Messages postés 1 Statut Membre -  
Kalissi Messages postés 221 Statut Membre -
Bonjour,

j'un problème avec le code suivant il exécute les deux instructions on même temps

for i=0 to dt.rows.count -1
if dt.rows(i).item("CIN").valuetostring=textbox1.text
message.show("deja existe")
else
form2.show
end if
next i

j'ai essayer avec i=i+1 et avec exit for avant else mais quand if is true ils faire if et else on même temps

2 réponses

  1. Kalissi Messages postés 221 Statut Membre 20
     
    Bonjour,

    Je ferais comme ceci !

    If (Not (String.IsNullOrEmpty(tbx_Entree.Text))) Then
    Dim Limite As Int32 = dt.Rows.Count - 1
    For i = 0 To Limite
    If dt.Rows(i).Item("CIN").ToString = tbx_Entree.Text Then
    MessageBox.Show("deja existe")
    Exit For
    Else
    form2.show()
    End If
    Next i
    End If

    K
    0
  2. Kalissi Messages postés 221 Statut Membre 20
     
    Re:

    Corrigé et testé :

    If (Not (String.IsNullOrEmpty(tbx_Entree.Text))) Then
    Dim Limite As Int32 = dt.Rows.Count - 1
    For i = 0 To Limite
    If dt.Rows(i).Item("Mot").ToString = tbx_Entree.Text Then
    MessageBox.Show(String.Format("{0}{1}{2}", "deja existe", " - i = ", i))
    Exit For
    Else
    Form2.ShowDialog()
    End If
    Next i
    End If

    K
    0