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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  format...
~Eric
não registrado
ENUNCIADA !
Postada em 12/04/2006 23:06 hs   
iae galera blz..
poh mew toh com um problemão, seguinte:
eu tenho q estrair certos algarismos de um número, exemplo..1.500 preciso pegar o somente "500" de 1.500...
se fosse com datas seria facil - Format(date,"DD" ou "MM" ou "YY") - só que eu preciso pegar somente um trecho do numero...
EmoçõesEntenderam???
Poh, se aguém souber como eu posso resolver isso ou algo parecido eu agradeço.... valew...
   
>>|Bedin|<<
não registrado
ENUNCIADA !
Postada em 12/04/2006 23:42 hs   
Tente isso:

Dim T As String
T = Text1.Text

MsgBox Mid(T, 3)
MsgBox Right(T, 3)

Atenciosamente,

   
>>|Bedin|<<
SANTO ANDRE
SP - BRASIL
ENUNCIADA !
Postada em 12/04/2006 23:44 hs            
  Tente isso:

Dim T As String
T = Text1.Text

MsgBox Mid(T, 3)
MsgBox Right(T, 3)

Atenciosamente,

.:Rodrigo Bedin:.
   
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
ENUNCIADA !
Postada em 13/04/2006 07:20 hs            
    Dim i As Integer
    i = InStr(1, Me.Text1.Text, ".")
    MsgBox Mid(Me.Text1.Text, i + 1, Len(Me.Text1.Text) - i + 1)
   
Luiz_Fernando
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 13/04/2006 14:38 hs            
nao sei mas acho q esse tb serveria....
 
Text1.Text = Mid(Text2.Text, 3)
 
espero ter ajudado

E-mail.............. luyzfernando@gmail.com
Msn...................luyzfernando@hotmail.com
 
Obs. Hotmail uso apenas para messenger!!
 
Aprendiz e Futuro programador!!!
 
"Todo seu conhecimento deve ser compatilhado!!!"  ---Emoções---
                                    
   
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
ENUNCIADA !
Postada em 13/04/2006 14:49 hs            
luiz servi serve, mas se as casas decimais mudarem ja nao serve mais, do jeito que eu fiz pode colocar as casas decimais do jeito que ele quiser.
   
Página(s): 1/2      PRÓXIMA »


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