|
|
Postada em 11/07/2006 02:12 hs
Ola, Estou comesando agora a programar em vb, e tendo as primeiras duvidas, a primeira e a seguinte, sera que tem como fazer com que o Textbox, aceite somente numeros. Ex. quando o usuario, digitar letras não acontecerá nada. se alguem souber, por favor me ajude. obrigado Mario |
|
|
|
|
|
|
|
Postada em 11/07/2006 07:33 hs
no evento lostfocus do textbox coloque: if not isnumber(text1.text) then text1.setfocus endif |
|
|
|
|
|
Postada em 11/07/2006 07:34 hs
desculpe ficou faltando a conversao if not isnumber(cdbl(text1.text)) then text1.setfocus endif |
|
|
|
|
|
Postada em 11/07/2006 08:37 hs
Não seria mais simples optar pelo maskedbox ?
dsmn
|
|
|
|
|
|
Postada em 11/07/2006 10:19 hs
Vc vai colocar o código abaixo no evento KeyPress do seu textbox. Segue o exemplo q o colega Kerplunk passou aqui no site: Private Sub txtCPF_KeyPress(KeyAscii As Integer) If Not IsNumeric(Chr(KeyAscii)) and KeyAscii <> 8 Then
msgbox "Digite apenas números por favor!!" KeyAscii = 0
Exit Sub
End If End Sub ok?? A função q o CardosoG passou não é IsNumber é IsNumeric e não precisa converter pois dará erro de compatibilidade entre os tipos ok?? Creio q ele somente esqueceu... :) t+ |
|
|
|
|
|
Postada em 11/07/2006 16:47 hs
Valeu, deu serto. Obrigado pela atenção. |
|
|
|
