none
Como puedo comparar si existe y solo me lo diga una vez RRS feed

  • Pregunta

  • Buenas como puedo hacer para que me compruebe y solo me lo notifique una vez no todo el bucle

    Gracias

     'COMPRUEBA INVENTARIO
        Sub Comprueba_Inventario()
    
            If System.IO.File.Exists("Datos\Inventario.xml") Then
                CB_tipo_Inventario.SelectedIndex = 0
                CBInventario.SelectedIndex = 0
                XmlDocument_Inventario = New XmlDocument
                XmlDocument_Inventario.Load("Datos/Inventario.xml")
                XmlNodeList_Inventario = XmlDocument_Inventario.SelectNodes("Inventario/Ingrediente")
                For Each node As Xml.XmlNode In XmlNodeList_Inventario
    
                    Dim Lupulo_Estock As String = node.ChildNodes(0).InnerText
    
    
    
                    If node.ChildNodes(3).InnerText = "Lupulo" Then
                        If Not node.ChildNodes(0).InnerText.Contains(Receta_Nueva.DGV_Lupulos.CurrentRow.Cells(0).Value) Then
                            MsgBox("No esta en estock " & Receta_Nueva.DGV_Lupulos.CurrentRow.Cells(0).Value)
                        Else
                            MsgBox("Si esta en estock " & Receta_Nueva.DGV_Lupulos.CurrentRow.Cells(0).Value)
                        End If
    
                        If Not Receta_Nueva.Col_Nombre_Lupulo.Items.Contains(Lupulo_Estock) Then
                            Receta_Nueva.Col_Nombre_Lupulo.Items.Add(node.ChildNodes(0).InnerText)
                        End If
                    End If
                Next
            Else
    
            End If
            '' ''End If
        End Sub
        'COMPRUEBA INVENTARIO


    • Editado JETET viernes, 8 de septiembre de 2017 19:29
    viernes, 8 de septiembre de 2017 19:27

Todas las respuestas

  • Saludos:

    Tienes varias validaciones, pero supongo que es en la linea que dice:

    MsgBox("Si esta en estock " & Receta_Nueva.DGV_Lupulos.CurrentRow.Cells(0).Value)
    

    Despues del mensaje puedes colocar "Exit ForEach"

    Espero ayude.

    JOSE LUIS


    Dios NO los llamo LAS DIEZ RECOMENDACIONES

    • Propuesto como respuesta Jose Luis Vargas sábado, 9 de septiembre de 2017 1:25
    sábado, 9 de septiembre de 2017 1:25
  • pero lo que quiero es que lo recorra todos y me diga que si existe o no 

    no que mire el primero y si no existe se salga eso no me vale por que lo mismo puede estar por la mitad

    y si es asi y por ejemplo esta el 5 lugar no me repita le memsaje 4 veces solo una vez

    sábado, 9 de septiembre de 2017 5:44
  • como puedo meter un contador que sume las veces que no existe 

    si las veces que no existe es igual al contador de donde se ha camparado 

    el producto no existe

    y si es diferente si existe

    No se si me he explicado

    domingo, 10 de septiembre de 2017 19:23