squall
|
SÃO BERNARDO DO CAMAPO
SP - BRASIL
|
|
Postada em 15/07/2004 16:41 hs
Boa tarde Gostaria de saber como posso fazer com que um maskedit funcione da seguinte forma exemplo, se eu digitar 159 ao sair do maskedit ele fica como 1,59 Obrigado |
|
|
|
|
|
Rochª
|
RIO DE JANEIRO
RJ - BRASIL
|
|
Postada em 15/07/2004 16:48 hs
Voce pode fazer pela mascara. Coloque na propriedade MASK do campo '#,##' e teste ou Voce pode fazer manualmente Private Sub txt_texto_LostFocus()
txt_texto = txt_texto / 100 End Sub
__________________________________________________________________________ Qualquer coisa post Rochª
|
|
|
|
squall
|
SÃO BERNARDO DO CAMAPO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 15/07/2004 17:17 hs
Isso funcionaria para valores até 9,99, só que eu tbm tenho que digitar valores acima de 10, então ao digitar 1140 ao sair do mask deveria aparecer 11,40 mesmo assim obrigado amigo Teria alguma forma para fazer isso ?? |
|
|
|
|
|
Postada em 15/07/2004 17:23 hs
Tem um controle chamado ACTIVETEXT.OCX, que está disponivel na Troca de Arquivos.
Veja se ele te atende.
________________________ Té + Que NIMB role bons Dados! 
|
|
|
|
Keyo
|
CURITIBA
PR - BRASIL
|
|
Postada em 15/07/2004 17:48 hs
'use uma text private sub text1_lostfocus if isnumeric(text1.text) = false then msgbox "Campo numérico.",vbcritical,"Teste" text1.setfocus exit sub else text1.text = format(text1.text,"##,##0.00") end if end sub |
|
|
|
squall
|
SÃO BERNARDO DO CAMAPO
SP - BRASIL
|
|
Postada em 15/07/2004 17:59 hs
agora sim, obrigado pela ajuda à todos Qualquer coisa tamos aí |
|
|
|
