Visual Basic 6 - vb6.0 come scrivere (condizione) diverso da numero decimale

riformula la domanda lo scritta male
come
allora una txt1 se scrivo dentro un numero deve venire fuori msgbox"hai scritto un numero" se e un carattere msgbox" nn e un numero" io ho provato cosi ma nn va
if txt1.text <> integer then msgbox" no nn e un numero"
else
msgbox"hai scritto un numero"
end if
questo pezzo e sbagliato if txt1.text <> integer

prova con questa funzione:

Private Function IsInteger(strValue As String) As Boolean
    If IsNumeric(strValue) Then
        If Int(Val(strValue)) = Val(strValue) Then
            If Val(strValue) > -32769 And Val(strValue) < 32768 Then
                IsInteger = True
            End If
        End If
    End If
End Function

Comunque questa controlla se strValue è un intero
se vuoi una funz per tutti i tipi devi un attimo cambiare i valori ma la funzione fondamentale è IsNumeric

Aldo ... guarda che non si deve aprire un'altra discussione ... dovevi continuare in quella già aperta ...

E anche se ti dovresti spiegare meglio (continua a capirsi poco), probabilmente la sola IsNumeric ti basta ...

Bonny ... non credo voglia sapere se è un intero e comunque perché solo a 16 bit ?

Questo topic è in violazione di una o più norme del regolamento: pierotofy.it/pages/extras/forum/9/3839-regolamento/ .
    
Dopo averlo letto riapri un nuovo topic assicurandoti di aver rispettato le regole. Grazie per la tua pazienza.