 Autor
|
Tema: Donde estan los ceros? o.O (Leído 3,605 veces)
|
extreme69
 Desconectado
Mensajes: 178
Be BlackHat but don't forget your principles.
|
Hola, Estoy haciendo un RGB to RGBA coverter, la diferencia entre ellos es que en RGB los valores van del 0 al 255 y en RGBA van del 0.0 al 1.0. Entonces hago RGB_R / 255 = RGBA_R: Dim RGB_R As String
Dim value As String
RGB_R = Text1.Text
value = RGB_R / 255
MsgBox value Pero se come los 0 ... por ejemplo si hago 1 / 255 en la calculadora me da: 0,003921568627450980392156862745098 pero si lo hago con mi soft me da 3,92156862745098E-03 Incluso si hago: Dim RGB_R As String
Dim value As String
RGB_R = Text1.Text
value = RGB_R / 255
dim value2 as string
value2 = value / 1000
MsgBox value Sigue sin mostrar los ceros ...
|
|
|
|
|
En línea
|
|
|
|
$Edu$
Desconectado
Mensajes: 1.842
|
dim a as double, b as double dim res as double a = 1 b = 1000 res = a / b msgbox res
Integer y long para numeros enteros, double para con coma Y por cierto, no haces una conversion, estas dividiendo un string, cuidado con eso. Cdbl("123") creo
|
|
|
|
« Última modificación: 31 Octubre 2011, 23:27 pm por $Edu$ »
|
En línea
|
|
|
|
$Edu$
Desconectado
Mensajes: 1.842
|
A no, creo que te habre ayudado pero sigue dando como dices, pero fijate que dice E -03 que es elevado a la -03 que seria "correr" la coma 3 veces a la izquierda. No sabia que se mostraba asi, pero si luego sigues haciendo operaciones no te preocupes, porque si despues por ejemplo lo multiplicas por 100 se va el exponente
|
|
|
|
|
En línea
|
|
|
|
79137913
Desconectado
Mensajes: 1.169
4 Esquinas
|
HOLA!!! Por ejemplo si hago 1 / 255 en la calculadora me da: 0,003921568627450980392156862745098 pero si lo hago con mi soft me da 3,92156862745098E-03
Te respondiste solo, los dos numeros: 0,003921568627450980392156862745098 3,92156862745098E-03 SON IGUALES E-03 significa *10^-3 que es 0,001 entonces 3,92156862745098 * 0,001 es = a 0,00392156862745098 Que es muy cercano a tu numero. Si haces operaciones con ese numero con E no vas a tener problemas  GRACIAS POR LEER!!! |
|
|
|
|
En línea
|
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"
79137913 *Shadow Scouts Team*
|
|
|
burbu_1
Desconectado
Mensajes: 159
hamen gaoz
|
para ver esos ceros, que como te dice 79137913 no desaparecen, puedes usar la función formatMsgBox Format(value, "General Number")
|
|
|
|
|
En línea
|
|
|
|
extreme69
Desconectado
Mensajes: 178
Be BlackHat but don't forget your principles.
|
Si, sé que son iguales, pero yo necesitaba los ceros.
Gracias burbu_1, me funcionó perfecto!
|
|
|
|
|
En línea
|
|
|
|
extreme69
Desconectado
Mensajes: 178
Be BlackHat but don't forget your principles.
|
Hay alguna manera fácil de cambiar el símbolo de los decimales? me refiero a la coma, hay forma fácil de cambiar la coma por un punto o tengo que hacer una función que reemplace el char? EDIT: Function reemplazarTexto(textoCompleto As String, textoBuscar As String, textoReemplazar As String) As String
Dim resultado As String
resultado = Replace(textoCompleto, textoBuscar, textoReemplazar, , , vbTextCompare)
reemplazarTexto = resultado
End Function Quedó funcionando, gracias!  |
|
|
|
« Última modificación: 1 Noviembre 2011, 00:37 am por extreme69 »
|
En línea
|
|
|
|
BlackZeroX
Wiki
Desconectado
Mensajes: 3.158
I'Love...!¡.
|
.
FormatNumber()
Dulces Lunas!¡.
|
|
|
|
|
En línea
|
The Dark Shadow is my passion.
|
|
|
extreme69
Desconectado
Mensajes: 178
Be BlackHat but don't forget your principles.
|
Gracias Black!
|
|
|
|
|
En línea
|
|
|
|
|
| Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
|
¿Donde estan mis post?
Sugerencias y dudas sobre el Foro
|
donky
|
3
|
2,241
|
11 Septiembre 2004, 00:24 am
por byebye
|
|
|
|
Enteros con ceros al inicio AYUDA
Programación C/C++
|
cesarjgrd.18
|
6
|
2,974
|
7 Noviembre 2011, 02:17 am
por BlackZeroX
|
|
|
|
numero rodeado de ceros en array
Java
|
fprg
|
5
|
2,752
|
29 Noviembre 2013, 20:59 pm
por ivancea96
|
|
|
|
¿Dónde están los mazos en Mana Link 3.0?
Software
|
Tachikomaia
|
2
|
2,869
|
5 Abril 2021, 20:59 pm
por Tachikomaia
|
|
|
|
Existe una app de objetos por casa que no se donde están? App
Dispositivos Móviles (PDA's, Smartphones, Tablets)
|
win_7
|
5
|
2,891
|
19 Mayo 2021, 12:14 pm
por el-brujo
|
 |
