AdmiltonAlves Postado Agosto 16, 2014 Denunciar Share Postado Agosto 16, 2014 Boa tarde, se alguém descobrir o erro, fico muito grato. Tenho 4 textbox Private Sub textbox1_change() IF textbox1 = (textbox2 * textbox3) > (textbox2 * textbox4) textbox2 * textbox3 Else textbox1 =(textbox2 * textbox3) < (textbox2 * textbox4) textbox2 * textbox4 End IF End Sub o valor deve sair na textbox1, mas só esta funcionando na condição Else, mesmo sendo a 1ª condição melhor. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Benhur Palini Postado Agosto 16, 2014 Denunciar Share Postado Agosto 16, 2014 Oi, Admilton! a sintaxe é If condição Then ... Elseif condição Then ... End If Private Sub textbox1_change() IF (textbox2 * textbox3) > (textbox2 * textbox4) then textbox1 = textbox2 * textbox3 Elseif (textbox2 * textbox3) < (textbox2 * textbox4) then textbox1 = textbox2 * textbox4 End IF End Sub Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Alyson Ronnan Martins Postado Agosto 16, 2014 Denunciar Share Postado Agosto 16, 2014 Use o Cdbl em todos os TextBox Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
AdmiltonAlves
Boa tarde, se alguém descobrir o erro, fico muito grato.
Tenho 4 textbox
Private Sub textbox1_change()
IF textbox1 = (textbox2 * textbox3) > (textbox2 * textbox4)
textbox2 * textbox3
Else
textbox1 =(textbox2 * textbox3) < (textbox2 * textbox4)
textbox2 * textbox4
End IF
End Sub
o valor deve sair na textbox1, mas só esta funcionando na condição Else, mesmo sendo a 1ª condição melhor.
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.