Comprobar si un numero es entero

[Neobius]

Como puedo comprobar si un numero es entero o no.  Por ejemplo:

Código [Seleccionar] Expandir


Numero = 758 / 526


Como compruebo ahora si el valor de la variable numero es un entero o no??

[Robokop]

mira en BASIC existe un operador llamado MOD
ese operador lo que hace es dividir un numero entre X numero pero devuelve el resto un ejemplo seria asi
msgbox "que numero quieres ver?"
numero = text1.text
caca = text1.text mod 2
msgbox caca
y lo que hace es devolverte el resultado de la divicion por 2
y para saber si es impar o par haces esto

Código [Seleccionar] Expandir

Private Sub Form_Load()
a = InputBox("numero:")
If a Mod 2 = 0 Then
MsgBox "el numero es par"
Else
MsgBox "el numero es impar"
End If

End Sub
Explicacion : lo que hace aqui es almacenar en a lo que escribes  en un inputbox y despues
a mod 2 es Numero almacenado en a  dividelo en 2 y devuelveme el resto en este caso es 0 , si sabes que en matematicas la propiedad de un numero entero es todo numero dividido en 2 que el resto sea 0 es entero a pues aqui se hace eso y despues condiciona si mod osea el resto de la divicion es 0 entonces el numero es entero si no es impar
saludos y espero que te sirva

[NYlOn]

Código [Seleccionar] Expandir


Numero = 758 / 526
If Numero = Int(Numero) then
msgbox "Numero entero"
Else
MsgBox "No entero"
End If


[.:CorTeX:.]

Código [Seleccionar] Expandir


If Not IsNumeric(Text1.text) Then
MsgBox "No es numerico!"
Else
MsgBox "Bien"
End if


[NYlOn]

Lo que necesita saber es si el numero es entero o da con coma, no si se trata de numeros o caracteres.. Por lo menos es lo que entendi yo 

Saludos.-

[Robokop]

si es de numeros enteros ,pero no se si se refiere a como tu lo hiciste o como yo lo explique

[Neobius]

Me referia a lo que ha explicado NYlOn. Muchas gracias por la ayuda.