Como faço para um text (e virgula ",") validar somente numeros nao aceitar texto, isso na hora da validação, tipo o Ucase e Lcase?

Olhe, você poderia ter dado uma olhada na parte de dicas do VBWEB
Lá tem, rs...

mas como sou bonzinho vou te dar o LINK aqui:
http://www.vbweb.com.br/dicas_visual.asp?Codigo=3051&Classificacao=

T+

desculpe, sou novo no site, ja vi a parte de dicas, projetos, apostilas... mais nao entrei no link... desculpe.... vou passar la e da uma olhada. Oberigado.

Relaxa, boas vindas ao VBWEB ! rs..

Crie:
(.) Um Módulo

Public Function ReturnNumber(Text As String) As String
    Dim i As Integer, j As String
    For i = 1 To Len(Text)
        If Asc(Mid(Text, i, 1)) < 48 Or _
           Asc(Mid(Text, i, 1)) > 57 Then
        Else
            j = j & Mid(Text, i, 1)
        End If
        ReturnNumber = j
    Next
End Function

Crie:
(.) CommandButton
(.) Label1
(.) TextBox

Private Sub Command1_Click()
Label1.Caption = ReturnNumber(Text1.Text)
End Sub

Obs: Quando você clicar no CommandButton irá retornar no Label1 somente números que estejam no Text1

T+

Andre....tenta isso

 

Public Function Valida_Numero(Texto as string) as String

Dim X%

         For x = 1 To len(texto)

              if isnumeric(mid(texto,x,1))  then

                 Valida_Numero = Valida_Numero &  Mid(texto,x,1)

              Endif

          Next x

End Function

 

 

Infelizmente utilizei todos esses recursos mais, nao deram certo... vc's nao tem outra forma pois tentei modificar mais nem assim. Tenho um 'txtvend', e quero que ele so aceite número, e depois que perder o foco fique no formato ###,##. Ex: 578,55