Visual Basic - Mostras texto y un resultado en un label

Life is soft - evento anual de software empresarial
   
Vista:

Mostras texto y un resultado en un label

Publicado por Juan (2 intervenciones) el 06/01/2009 15:51:02
Hola a todos.

tengo puesto en un programita que estoy haciendo la siguiente instrucción:

Private Sub Command1_Click()
Label4.Caption = "1:" + (1 + (Sqr(Text2.Text / Text1.Text))) / (1 - (Sqr(Text2.Text / Text1.Text)))

End Sub

Me dá error. LO que quiero conseguir es que en label4 el texto sea: 1: x.xx

donde 1: es un texto predetermidado y las x.xx es el resultado de la formula matemática siguiente.

Si lo hago por separado todo OK pero las dos cosas juntas no se hacerlo

ejemplos:

Private Sub Command1_Click()
Label4.Caption = (1 + (Sqr(Text2.Text / Text1.Text))) / (1 - (Sqr(Text2.Text / Text1.Text)))

End Sub

el resultado de x.xxxxxxxx es el correcto

Private Sub Command1_Click()
Label4.Caption = " 1: "

End Sub

el resultado 1: es el correcto tambien

como debería ser la instruccion para que el resultado fuera : 1:x.xxxxxxxx ???

Muchas gracias a todo aquel que se interese por este asunto y me ayude
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Visual Basic
- Código fuente de Visual Basic
- Cursos de Visual Basic
- Temas de Visual Basic
- Chat de Visual Basic
información
Códigos de Visual Basic
- Agenda
- Conexión a base de datos
- Contador

RE:Mostras texto y un resultado en un label

Publicado por P3L30N2009 (701 intervenciones) el 06/01/2009 17:26:13
Label4.Caption = "1:" & (1 + (Sqr(Text2.Text / Text1.Text))) / (1 - (Sqr(Text2.Text / Text1.Text)))

El concatenador de cadenas en VB es el símbolo de ampersand (&). Tal como lo estás poniendo VB intenta sumar una cadena "1:" a un valor numérico y por eso dá error.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:MUY AGRADECIDO

Publicado por Juan (2 intervenciones) el 06/01/2009 17:48:48
Muchas gracias por su ayuda. Funcionó a la primera.

Por favor, como dejar solo dos decimales de la formula ??

Feliz año y muchas gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:MUY AGRADECIDO

Publicado por P3L30N2009 (701 intervenciones) el 06/01/2009 18:33:06
Label4.Caption = "1:" & Format( (1 + (Sqr(Text2.Text / Text1.Text))) / (1 - (Sqr(Text2.Text / Text1.Text))) , "#,##0.00")

Salud en 2009
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:MUY AGRADECIDO

Publicado por Hector Castro (27 intervenciones) el 07/01/2009 17:24:41
si hay que darle la gracia a este hombre ami tambien me a ayudado sin numero de veses i simpre acierta en los problema
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar