esta es mi operacion
dim variable as string
variable=(registros.Text/paginas.Text)
IF variable es decimal then
convertir a entero y sumar uno osea INT(VARIABLE)+1
ELSE
laberl.tex= varibale
END IF
gracias por ayduarme...

| ||||
independientemente de la respuesta o no, ya lo puede solucionar, como soy demaciado nuevo en esto pues pienso que hay funciones especificas, pero investigando mas fondo no encontre nada, asi que hay les dejo el codigo por si alguien se topa con el mismo problema dim Numero as string **** la variable numero es el resultado de alguna operacion que de decimales o enteros y tengamos qe validar si son decimales o enteros Dim ParteEntera As String = Int(Numero) Dim ParteDecimal As String If (Len(Numero) - Len(ParteEntera)) = 0 Then ParteDecimal = numero label.TEXT = parteDecimal Else ParteDecimal = (Int(Numero)+1) label.TEXT = parteDecimal End If *** hay problemas sencillos que a simple vista son tan complicados, solo es cuestion de relajarnos y comenzar de nuevo a intertar su solucion
__________________ solo firma |