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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Tem funçao ?
léee
OURINHOS
SP - BRASIL
Postada em 16/09/2004 17:08 hs            
tudo bem, pessoal?
Uma duvida, em vez de fazer um algoritmão, tem uma função que retorna a parte decimal de um numero inteiro,  outras que retorna a parte da centena e unidade?
 
muito grato pela sua atençao, paciencia e colaboracao

Nós somos uma família VBWEB, só prosperamos neste ambiente sensato. Meus votos de Felicidade à todos.
     
Alfterra
Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 16/09/2004 18:19 hs            
olá,
Dim Numero As String
    Numero = CCur("12.530,25")
       'interiro
       MsgBox Int(Numero)
      
       'fração
       MsgBox Numero - Int(Numero)
       
       

     
léee
OURINHOS
SP - BRASIL
Postada em 17/09/2004 03:33 hs            
tudo bem?
Nao estou pensando com numeros reais, sim com numeros inteiros mesmo.
Ex: 51, tem alguma função q retorne a parte da dezena (5) e outra função q retorne a parte da unidade (1).
Eu já fiz um algoritmo, ficou pequeno. Mas se alguem sabe de funçoes que fazem isto, respondam por favor.
muito grato

Nós somos uma família VBWEB, só prosperamos neste ambiente sensato. Meus votos de Felicidade à todos.
     
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 17/09/2004 08:27 hs         
  Dim i As Double
  i = 235.565555
  i = Int(i * 100) / 100 'formatando com duas casas decimais em o format
  MsgBox i 'numero formatado
  MsgBox Format(i - Int(i), "##0.00") 'parte decimal
     
Página(s): 1/1    

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