Hola chicos, bueno vengo a postear esta duda porque hoy en la clase del colegio de laboratorio en VB 6 hicimos una calculadora que constaba de 2 textboxes donde se ingresaban 2 números, un botón llamado sumar donde se insertaba el código, y un label donde se mostraba el resultado final de la operación, les dejo el código:

Private Sub cmdBoton1_Click()
Dim sngX As Single, sngY As Single, sngResult As Single
'Carga de datos
 
sngX = Val(txtValor1.Text)  'El textbox Nº1 donde se ingresa el primer numero se llama txtValor1
sngY = Val(txtValor2.Text)  'El textbox Nº2 donde se ingresa el primer numero se llama txtValor2
'Calculo de la suma
 
sngResult = sngX / sngY
lblSalida.Caption = Str(sngResult)
End Sub

Mi prof dijo que no era lo mismo poner sngX = Val (txtValor1.Text) que poner sngX = txtValor1.Text ya que en el 2do caso estaría guardando en la variable el cartel del contenido del textbox (el número) pero no como número sino como un string, y se le pone el val para que lo convierta en número

Después en lblSalida.Caption lo mismo, pone lblSalida.Caption = Str (sngResult) en vez de lblSalida.Caption = sngResult que dice que aunque llegue a funcionar no está bien, porque el resultado lo tiene que convertir a caracteres osea de tipo string

La verdad no le entendí nada por qué usa el Val y el Str ya que yo pensaba que era lo mismo sin ponerlos, les pido por favor si me pudieran explicar el por qué y la diferencia

Muchisimas gracias

La función Val convierte una cadena en un número
Ejemplo:

cadena = "123456"
cadena = Val(cadena)

La función Str un número en una cadena.
Ejemplo:

'Ahora cadena vale 123456

cadena2 = 123456
cadena2 = Str(cadena2)

'Ahora cadena2 vale "123456"

mmm todavía no lo termino de entender alguien tendrá con algún ejemplo para entenderlo mejor?

Muchas gracias!

Tranquilo nov

Si mal no entendí es para que si se pone "5" no lo tome como un string o cadena de caracteres si no como un número, ahora si el usuario ingresa una letra, ¿En qué lo transforma? Si no lo puede transformar en número...

Suponiendo que en las casillas donde hay que ingresar números, coloca X y en la otra Y y los tiene que sumar, si no estuviera el val los concatenaría como XY verdad??

Y si está el Val que haría al ingresar esas 2 letras?

Probé con este código y funciona igual

Private Sub Command1_Click()
Dim sngX As Single, sngY As Single, sngresult As Single
sngX = Text1.Text
sngY = Text2.Text
sngresult = sngX + sngY
Label1.Caption = sngresult
End Sub

Excelente! Ahora ya lo entendí!!

Y con el Str ()?