[RESOLVIDO]Inteiros múltiplos de 10

[Lucas Duzo]

Pessoal;

preciso validar se o valor inserido em minha textbox é múltiplo de 10.

alguém tem idéia de como eu faço isso ?

Inicialmente tentei tratar desta maneira:

Aviso1.Text = "61"
menor60_a1 = Convert.ToInt32(Aviso1.Text)
if menor60_a1 / 10 <> 1 Then
MessageBox.Show("Os Parâmetros devem ser múltiplos de 10")
end if

porém desta maneira, terei que criar várias condições "if", gostaria de saber um exemplo mais prático !!

Obrigado

Pessoal, estou utilizando vb.net

Editado Outubro 26, 2010 por Lucas Duzo

[raphael_suporte]

não entendi o porque terá que criar varios IF's, a lógica está correta porem você não precisa colocar em uma variável

if (Convert.ToInt32(Aviso1.Text) / 10) <> 1 Then
     MessageBox.Show("Os Parâmetros devem ser múltiplos de 10")
end if

[Lucas Duzo]

Só uma observação: eu errei na condição do primeiro post o correto seria

if menor60_a1 / 10 <> 6 Then
MessageBox.Show("Os Parâmetros devem ser múltiplos de 10")
end if

Voltando.... Então, terei que criar vários "if", por que assim, na minha aplicação neste textbox somente será aceito valores de 60 à 200, então no trecho

Aviso1.Text = "61" // valor digitado pelo usuário

e se o usuário digita 70 onde / 10 = 7, o resultado é diferente de 6 porém o número é múltiplo de 10, então não deveria aparecer a mensagem !!! e neste caso vai aparecer, por isso eu teria que fazer várias condições "If"

Entendeu mais ou menos ?

Acredito que a solução seja pela função "MOD" já utilizou ou tem idéia ?

[raphael_suporte]

na verdade nem precisa... se o cara vai digitar um valor entre 60 a 200 mas você só quer os múltiplos de 10....

Usando a matemática e programando um pouco mais...

'primeiro verifica se o valor está nesta condição

dim multiplica as int32

if  ((Convert.ToInt32(text1.text) => 60) and (Convert.ToInt32(text1.text) =< 200)) then
      ' depois você irá pegar o valor digitado para rodar com o mid e verificar para depois multiplicar.

       ' Aqui ele irá ignorar o último caracter do valor digitado. Ex se for 64 ele pegara o 6, se for 115 ele ignora o 5
       multiplica = Convert.toInt32(mid(1,text1.text,len(text1.text)-1))
       
      'Agora compara se o valor retirado da string multiplicado por 10 é igual ao valor digitado
      if (multiplica * 10 ) <> Convert.toInt32(text1.text) then
                messagebox.show("Valor digitado não é multiplo de 10")
      end if
else
       messagebox.show("Valor fora do padrão")
end if

usando mais a lógica... todo número múltiplo de 10 termina em 0, basta conferir se o valor digitado está na faixa escolhida e se termina com "0"

[Lucas Duzo]

Beleza !!

Vou testar essa lógica e logo volto a postar novamente o resultado !!

Obrigado

[Lucas Duzo]

Pessoal;

consegui resolver da seguinte forma:

Public Valorvalido_a1 As Integer

menor60_a1 = Convert.ToInt32(Aviso1.Text)
// a variável vai receber o resto da divisão entre menor60_a1(valor que o usuário digitou na textbox) / 10
Valorvalido_a1 = menor60_a1 Mod 10

If Valorvalido_a1 <> 0 Then

                    MessageBox.Show("Os Parâmetros devem ser múltiplos de 10")

                Else
// continua com o código ...

se alguém tiver dúvida, posta ae !!

Editado Outubro 26, 2010 por Lucas Duzo