elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: ¿Eres nuevo? ¿Tienes dudas acerca del funcionamiento de la comunidad? Lee las Reglas Generales


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Redondear resultados mostrados en un TextBox		0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Redondear resultados mostrados en un TextBox  (Leído 3,459 veces)
Usuario 202

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Redondear resultados mostrados en un TextBox
« en: 18 Junio 2016, 03:53 am »
Buenas a todos los que leen este tema.

Continuando con mi pequeño proyecto en Visual Studio 2013, me he encontrado con otro inconveniente, el cual es.... ¿Cómo redondear un resultado mostrado en un TextBox?

Bueno siendo más específicos, quiero que el resultado de una operación hecha por un procedimiento sea redondeado (obviamente el resultado saldrá en decimales).

Buscando por ahí encontré este código.

Código
  1. TextBox?.Text = CDec(TextBox?.Text).ToString("N0")

El cual me redondea los decimales a partir del 0.5 para arriba.

Por ejemplo si ingreso 36, el resultado en esta operación seria 6.18, y el código no lo redondea lo deja en 6, pero si ingreso 52 el resultado seria 6.71 y me lo redondea a 7.

Entonces como le hago para que se pueda redondear aparir del 0.5 para arriba.

Este es el código en donde se hace la operación:

Código
  1. ' # Intervalo
  2.         Dim num As Double
  3.         Dim Ln10 As Double
  4.         num = Val(TextBox1.Text)
  5.         Ln10 = Math.Log(10)
  6.         TextBox2.Text = 1 + 3.333 * Math.Log(num) / Ln10
  7.         TextBox2.Text = CDec(TextBox2.Text).ToString("N0")
  8.         Intervalo = TextBox6.Text
  9.         TextBox1.Text = ""

Gracias por leer y espero que me puedan ayudar.
En línea
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.813



Ver Perfil
Re: Redondear resultados mostrados en un TextBox
« Respuesta #1 en: 18 Junio 2016, 06:00 am »
Puedes utilizar la función System.Math.Ceiling, de la siguiente manera:

Código
  1. Dim value As Double = 36.0R ' CDbl(TextBox1.Text)
  2. Dim result As Double = (1.0R + (3.333R * Math.Log(value)) / Math.Log(10.0R))
  3. Dim round As Integer = CInt(Math.Ceiling(result))
  4.  
  5. TextBox2.Text = CStr(round)

Saludos
« Última modificación: 18 Junio 2016, 06:09 am por Eleкtro » En línea
Usuario 202

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Re: Redondear resultados mostrados en un TextBox
« Respuesta #2 en: 19 Junio 2016, 20:18 pm »
Muchas gracias Eleкtro, me funciono de maravilla el código muchas gracias.
En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[Pregunta] Redondear Bordes Imagen
Programación Visual Basic 		skyweb07 7 8,528 Último mensaje 29 Agosto 2009, 16:46 pm
por skyweb07
a que se referia Ferchu con redondear VirtualAddres?
Análisis y Diseño de Malware 		Belial & Grimoire 2 3,540 Último mensaje 9 Noviembre 2011, 19:45 pm
por fary
(Solucionado)Redondear en c++. Ayuda
Programación C/C++ 		theseniorman 2 2,414 Último mensaje 4 Junio 2014, 20:13 pm
por theseniorman
Los mejores tráileres de videojuegos mostrados antes del E3
Noticias 		wolfbcn 0 1,326 Último mensaje 14 Junio 2016, 01:22 am
por wolfbcn
Usar Archivos mostrados en un ListBox
.NET (C#, VB.NET, ASP) 		rigorvzla 2 2,794 Último mensaje 28 Diciembre 2017, 15:44 pm
por rigorvzla
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines