Operaciones

[leoj90]

Bueno, empezando con vb y ya saben, quiero entender todo..... y me encontre con esto:
Resultado.Text = Val(Cuadro1.Text) * Val(Cuadro2.Text)
LlbOpera.Caption = "*"

Esto lo q hace es multiplicar cuadro1 con cuadro2 y escribir el signo de * porq se realizó una multiplicacion.. mi pregunta es: Si pongo algo como
Resultado.Text = Cuadro1.Text + Cuadro2.Text, suma los 2 o es obligatorio usar los Val ?

[jc_moty]

La respuesta es SI, si es obligatorio el uso de Val porque Cuadro1 y Cuadro2 son objetos TextBox, entonces todo lo que introduces en estos objetos el compilador lo entiende como cadena o string y si sumas dos cadenas, lo que el compilador hara sera concatenar estas cadenas; por ejemplo:


Dim x, y As String
x = "1"
y = "2"
res = x + y


El resultado de la suma sera "12".
Y como lo que queremos es el resultado de una operacion matematica, tenemos que convertir la cadena a un valor numerico; esta conversion se hace por medio de el metodo Val. Ahora bien, observa la diferencia del ejemplo anterior usando Val


Dim x, y As String
x = "1"
y = "2"
res = Val(x) + Val(y)


En este caso el resultado es: 3.

Espero me hayas entendido.
Saludos.

[leoj90]

Ah ok... tonces con Val se entiende q son operaciones y no cadenas...
6+6= 12 <- esto es lo q se quiere hacer
1+2= 12 <- esto no, esto es un string

Gracias!

[aldo1982]

Iniciado por leoj90

Bueno, empezando con vb y ya saben, quiero entender todo..... y me encontre con esto:
Resultado.Text = Val(Cuadro1.Text) * Val(Cuadro2.Text)
LlbOpera.Caption = "*"

Esto lo q hace es multiplicar cuadro1 con cuadro2 y escribir el signo de * porq se realizó una multiplicacion.. mi pregunta es: Si pongo algo como
Resultado.Text = Cuadro1.Text + Cuadro2.Text, suma los 2 o es obligatorio usar los Val ?

bue seria asi
pones dos cuadros de texto un boton (este boton relizara la operacion ke tu kieras en este ejemplo te pongo para ke haga una suma) y un label
en el boton pones
label1 = val(text1) + val(text2)

y listo, si kieres multiplicar usas el * para dividir la / (ojo con ladivicion por cero, tendrias ke usar el on error)

salu2

[Developer9]

cuando quiero sumar dos cajas de texto que contengan numeros yo pongo:

resultado.text = cint(text1.text) + cint(text2.text)

cint o cdec, según lo necesite. Ah y el .text está como demás

[aldo1982]

Iniciado por Developer9

cuando quiero sumar dos cajas de texto que contengan numeros yo pongo:

resultado.text = cint(text1.text) + cint(text2.text)

cint o cdec, según lo necesite. Ah y el .text está como demás

ke es el cint ? o el dced ?

[reanimar]

Pasa al tipo integer - cint

cdate a date
cdbl a double
y asi...

[leoj90]

Y como podria poner q al escribir un 0 se ponga una alerta u ocurra un error?
Algo asi ?:

Código:

If cuadro1.text = 0 Then
MsgBox "No puedes dividir entre 0"
End If

[David]

Iniciado por leoj90

Y como podria poner q al escribir un 0 se ponga una alerta u ocurra un error?
Algo asi ?:

Código:

If cuadro1.text = 0 Then
MsgBox "No puedes dividir entre 0"
End If

Y pues va por la misma cosa:

Código:

 
If Val(cuadro1.text) = 0 Then
Msgbox "No puedes dividir entre 0"
End If