Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: AlbertoBSD en 19 Mayo 2008, 18:14 pm



Título: Duda con Propiedad Dataformat en los Textbox y Label (Solucionado)
Publicado por: AlbertoBSD en 19 Mayo 2008, 18:14 pm
Tengo un  pequeño problema con el Dataformat en los textbox y label.

El problema esta que al mandar el resultado de una multiplicacion o division de Numeros Double, al .text del Textbox o el .caption del Label, Me muestra "," en lugar de Punto para separar los Decimales, ya he probado con el Dataformat de ambos y le especifico que quiero "." en lugar de ,. y no me lo hace asi.

La asignacion la realizo asi:

Código
  1. Dim c,v1, v2 as Double
  2. v1 = 2.2
  3. v2 = 2.0
  4. c = v1 * v2
  5. Text1.text = c
  6.  

lo cual me imprime: "4,4" lo que yo quiero es que aparezca "4.4"


Título: Re: Duda con Propiedad Dataformat en los Textbox y Label
Publicado por: SKL (orignal) en 19 Mayo 2008, 18:35 pm
usa la funcion format!


Título: Re: Duda con Propiedad Dataformat en los Textbox y Label
Publicado por: seba123neo en 19 Mayo 2008, 18:41 pm
y declaras mal las variables,hacelo asi:

Código:
Dim c As Double, v1 As Double, v2 As Double

porque sino te toma la primera y las otras como variant,en .NET si lo podes hacer asi...





Título: Re: Duda con Propiedad Dataformat en los Textbox y Label
Publicado por: cassiani en 19 Mayo 2008, 18:59 pm
Tambien puedes usar "Replace"

Código
  1. Text1.Text = Replace(c, ",", ".")

Dependerá de lo que tengas pensado hacer... hay funciones para seguir trabajando con el contenido del textbox correctamente aún depués de haber usado el replace...


Título: Re: Duda con Propiedad Dataformat en los Textbox y Label
Publicado por: seba123neo en 19 Mayo 2008, 19:11 pm
una solucion medio pedorra podria ser:

Código:
Private Sub Form_Load()
Dim c As Double, v1 As Double, v2 As Double
v1 = 2.2
v2 = 2
c = v1 * v2
MsgBox Str$(c)
End Sub

 :P :P


Título: Re: Duda con Propiedad Dataformat en los Textbox y Label
Publicado por: AlbertoBSD en 19 Mayo 2008, 21:02 pm
Gracias seba123neo

El codigo me quedo asi:

Código
  1. Dim c, v1, v2 As Double
  2. v1 = Val(Text1.Text)
  3. v2 = Val(Text2.Text)
  4. c = v1 * v2
  5. Label1.Caption = Str$(c)
  6.  

era solo cuestion de Usar la Funcion Str la cual no conocia xD

Muchas Gracias a todos


Título: Re: Duda con Propiedad Dataformat en los Textbox y Label
Publicado por: naderST en 19 Mayo 2008, 21:33 pm
Gracias seba123neo

El codigo me quedo asi:

Código
  1. Dim c, v1, v2 As Double
  2. v1 = Val(Text1.Text)
  3. v2 = Val(Text2.Text)
  4. c = v1 * v2
  5. Label1.Caption = Str$(c)
  6.  

era solo cuestion de Usar la Funcion Str la cual no conocia xD

Muchas Gracias a todos

lo mas correcto para mi es k uses Format pero bueno asi funciona.


Título: Re: Duda con Propiedad Dataformat en los Textbox y Label
Publicado por: AlbertoBSD en 12 Noviembre 2008, 17:11 pm
Si seria correcto, pero creo que en el fondo, format llega a llamar  Str.

Igual muchas gracias ya quedo solucionado.