USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Verificar se um numero eh inteiro
Kelebrimbor
TRAMANDAÍ
RS - BRASIL
Postada em 07/09/2005 11:05 hs            
Gente, alguem sabe como faco pra verificar se um numero eh inteiro ou decimal?

Dá-lhe internacional, unico campeao brasileiro invicto.
     
Jose.Niz
CURITIBA
PR - BRASIL
ENUNCIADA !
Postada em 08/09/2005 00:32 hs         
Simples:
A fórmula "Numero - Int(numero)" deve ser sempre igual a zero.

Porem o tipo definido para a variável já indica o seu tipo (Integer, Single, Currency Double)...
   
ArtSoft
SAO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 08/09/2005 10:21 hs         
Falo companheiro,
 
Acredito que seu problema é outro....vc quer saber se a variavel esta inteira ou não ! Vamos lá, Ex.:
 
DIM a,b as Integer, Inteiro as Boolean
a = 1
B = 1.2
 
if int(a)/a = 1 then Inteiro = TRUE else Inteiro = False
debug.print Inteiro
if int(b)/b = 1 then Inteiro = TRUE else Inteiro = False
debug.print Inteiro
 
 
Alexandre Costa
ArtSoftSystems
   
kerplunk
Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 08/09/2005 13:49 hs         
a = 1.2
If a - CInt(a) <> 0 or cint(a) - a <>0 Then msgbox "número não é inteiro"
 
     
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 09/09/2005 08:26 hs            
Pocure não fazer da forma como o Alexandre disse, dividindo o numero por ele mesmo, pois a variavel pode estar em branco, e vc vai gerar um erro de "Divisao por 0"...


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página