Carninha 0 Denunciar post Postado Dezembro 2, 2014 E o seguinte vou mostrar o codigo primeiro e explico logo embaixo Public Function QTE() As Integer 'Aqui e uma verificação de quantidade de estoque If txtQuantida.Text. > txtQTE.Text Then MsgBox("Quantidade insuficiente em estoque ", MsgBoxStyle.Information, "TOTAL CONTROL") txtQuantida.Focus() Return False End If Return True End Function Bom esta função verifica se meu textbox (txtquantida.text) for maior textbox(txtQTE.text) ele manda uma msgem box e manda um retorno em falso e para ali o problema e que quando realizo um teste tipo tenho 45(txtQTE.text) e 6(txtQuantida) ele fala que e insuficiente isso ta me deixando com muita raiva pq tem o bastante mais n vai . Compartilhar este post Link para o post Compartilhar em outros sites
leodiegoo 6 Denunciar post Postado Dezembro 2, 2014 Eu testei seu código aqui, e deu certo: Public Function QTE() As Integer Dim var As Integer = 2 Dim var2 As Integer = 1 If var > var2 Then MsgBox("Quantidade insuficiente em estoque ", MsgBoxStyle.Information, "TOTAL CONTROL") Return False End If Return True End Function Compartilhar este post Link para o post Compartilhar em outros sites
itlpps 109 Denunciar post Postado Dezembro 2, 2014 Você esta verificando strings. Converta os txt's para inteiros. If Convert.ToInt32(txtQuantida.Text) > Convert.ToInt32(txtQTE.Text) Then MsgBox("Quantidade insuficiente em estoque ", MsgBoxStyle.Information, "TOTAL CONTROL") txtQuantida.Focus() Return False End If Return True Compartilhar este post Link para o post Compartilhar em outros sites
KhaosDoctor 242 Denunciar post Postado Dezembro 2, 2014 E pelo que você disse embaixo, 6 é menor que 45... Então ele vai cair no if Compartilhar este post Link para o post Compartilhar em outros sites