Veran, en el campo de VisualBasic, digamos que lo domino mínimamente. Sin embargo, hace poco que tengo el editor de Visual Basic 6, y he intentado pasar las aplicaciones en VBScript a Visual Basic, pero en algunos casos no lo consigo. Les daré un ejemplo:
Es una calculadora con la siguiente función:
<script language=vbscript>
function operar (operador,op1,op2)
select case operador
case "Sumar":
operar = op1 + op2
case "Restar":
operar = op1 - op2
case "Multiplicar":
operar = op1 * op2
case "Realizar potencia"
operar = op1 ^ op2
case "Dividir en números enteros"
operar = op1 \ op2
case "Ver residuo"
operar = op1 Mod op2
case "Unir valores"
operar = op1 & op2
case "¿Iguales?"
operar = op1 = op2
case "¿Desiguales?"
operar = op1 <> op2
case "¿Valor 1 mayor?"
operar = op1 > op2
case "¿Valor 1 menor?"
operar = op1 < op2
case "¿Valor 1 mayor o igual?"
operar = op1 >= op2
case "¿Valor 1 menor o igual?"
operar = op1 <= op2
case "Media"
operar = (op1 + op2)/2
case "Dividir"
operar = op1 / op2
case else:
operar = (op1 + op2)*0
end select
end function
sub opera ()
dim res
operador = document.forms(0).operacion.value
operando1 = cint(document.forms(0).op1.value)
operando2 = cint(document.forms(0).op2.value)
res = operar (operador,operando1,operando2)
document.forms(0).result.value = res
end sub
</script>
Y, por supuesto, hay dos textboxs (op1 y op2) para indicar dos valores, un button y otra textbox donde se nos indica el resultado.
Agradecería muchísimo que me dieran indicaciones para adaptar este tipoo de códigos en VBScript a Visual Basic. No es necesario que me indiquen cómo harían ésto en este caso (si lo hacen será enormenete agredecido de todo modos), pero sí les rogaría me dieran pequeñas pautas a seguir para llevar a la prática estos casos.
Muchas gracias de antemano. Saludos.
Yashirobai
