Inicio
Buscar
Ingresar
Registrarse
Starfield: el juego que revolucionará el espacio y la tecnología
Hack x Crack - Comunidad de Seguridad informática
»
Programación
»
Visual Basic
»
[Tutorial]Hacer una Minicalculadora
Imprimir
Páginas: [
1
]
Ir Abajo
Autor
Tema: [Tutorial]Hacer una Minicalculadora (Leído 3697 veces)
hackmin
Visitante
[Tutorial]Hacer una Minicalculadora
«
en:
Mayo 09, 2011, 03:55:31 pm »
Bueno enseñare hacer una MiniCalculadora en Visual basic 6,se que es fácil para algunos pero hay muchas personas que no se profundiza muy bien en este lenguaje de programación orientado a objetos..
Bueno sin mas que decir prosigamos con el tutorial
Abrimos Visual basic 6,seleccionas EXE estándar y le damos 1 click a Abrir (o simplemente doble clic a EXE estándar)
Bueno aquí os dejare 1 imagen para que veais con que botones y cajas esta compuesta este proyecto..
Bueno como veis es un proyecto bastante simple y con las 4 operaciones mas habituales (Sumar,Rectar,Multiplicar y Dividir)..
Bueno cambiar ahora algunas cosas de los controles:
Primera caja de texto:
(Nombre) = txtOper1
Font : Pon tamaño 12 y seleccionas Negrita..
Segunda caja de texto:
(Nombre) = TxtOper2
Font: Pon tamaño 12 y Seleccionas Negrita..
Tercera caja de texto:
(Nombre) = TxtResult
Font: Pon tamaño 12 y Seleccionas Negrita..
Bueno ya hemos modificado dos propiedades de las cajas de textos.
Ahora modificaremos las etiquetas (/) y (=) (También se dice Label)
Primer Label (/) :
(Nombre) : LblOp
Font: Tamaño : 18 y Seleccionas negrita
Caption: /
Primer Label (=) :
(Nombre) : lblEqual
Font: Tamaño : 18 y Seleccionas negrita
Caption : =
Bueno ahora modificaremos los 4 Comandos ( Sumar,Restar,Multiplicar y Dividir)
Primer comando (Sumar):
(Nombre) cmdSuma
Font: Tamaño: 18 y seleccionas negrita..
Caption: +
Segundo comando (Restar)
Primer comando (Sumar):
(Nombre) cmdResta
Font: Tamaño: 18 y seleccionas negrita..
Caption: -
Tercer comando ( Multiplicar)
Primer comando (Sumar):
(Nombre) cmdMultiplicar
Font: Tamaño: 18 y seleccionas negrita..
Caption: *
Cuarto comando ( Dividir)
Primer comando (Sumar):
(Nombre) cmdDividir
Font: Tamaño: 18 y seleccionas negrita..
Caption : /
Bueno hago una pausa y explico las propiedades que hemos usado:
(Nombre) para especificar o determinar la expresión de cadena que identifica el nombre de un objeto.
(Font): Esta propiedad es muy facil de comprender pero lo explico de todas manera.. Simplemente puedes modificar el tamaño del texto,estilo de fuente y la fuente.
Caption: es la mas importante, y es la que se utiliza para establecer el texto que mostrará dicho control.. por ejemplo Label1.caption = "Hola"
os explico ese codigo: Label1 es el control y caption es el texto que aparecera en dicho control en este caso Hola..
Bueno cualquier duda ponerla en el post que os ayudare en lo que pueda
Ya solo falta el código
Option Explicit
Private Sub cmdDiv_Click()
txtResult.Text = Val(txtOper1.Text) / Val(txtOper2.Text)
LblOp.Caption = "/"
End Sub
Private Sub cmdProd_Click()
txtResult.Text = Val(txtOper1.Text) * Val(txtOper2.Text)
LblOp.Caption = "*"
End Sub
Private Sub cmdResta_Click()
txtResult.Text = Val(txtOper1.Text) - Val(txtOper2.Text)
LblOp.Caption = "-"
End Sub
Private Sub cmdSuma_Click()
txtResult.Text = Val(txtOper1.Text) + Val(txtOper2.Text)
LblOp.Caption = "+"
End Sub
Private Sub Form_Load()
End Sub
Bueno explico las lineas de aquí un poquito
Option explicit: El comando option explicit sirve para declarar todas las variables que se utilicen eso impide cometer errores en los nombre de las variables (confundir por ejemplo masa con mesa,por ejemplo)..
Cada partes que empieza con un private sub y termina con un end sub es un procedimiento..
La funcion Val() esta función convierte una serie de caracteres numericos (un texto formado por cifras).n el número entero o de
punto flotante correspondiente. Sin la llamada a la función Val() el operador + aplicado a cadenas
de caracteres las concatena, y como resultado, por ejemplo, “3+4” daría “34”. No es lo mismo los
caracteres “1” y “2” formando la cadena o string “12” que el número 12; la función val() convierte
cadenas de caracteres numéricos –con los que no se pueden realizar operaciones aritméticas- en los
números correspondientes –con los que sí se puede operar matemáticamente-. Visual Basic 6.0
transforma de modo automático números en cadenas de caracteres y viceversa, pero este es un caso
en el que dicha transformación no funciona porque el operador “+” tiene sentido tanto con números
como con cadenas.
Bueno espero que os halla gustado este tutorial.. las explicaciones las tome de 1 libro ya que si la explico con mis propias palabras lo entendereis mejor o peor según por eso mejor me limito a ponerlo directamente
Un salu2
En línea
¿CD?
{ L3 } Über
Mensajes: 285
Re:[Tutorial]Hacer una Minicalculadora
«
Respuesta #1 en:
Mayo 21, 2011, 10:30:20 pm »
Me acuerdo de cuando ni siguiera podrías instalar el vb en tu pc, así que veo que vas progresando, muy bien.
Así tiene que ser! Te felicito... y como siempre. Salu2...
En línea
franky508
{ L6 } Flooder del foro
Mensajes: 934
Re:[Tutorial]Hacer una Minicalculadora
«
Respuesta #2 en:
Mayo 21, 2011, 10:47:22 pm »
Muy buen tutorial. Bastante bien explicado. Espero que continues haciendo mas tutoriales de este tipo que sirven mucho
Salu2
En línea
Skype: fran.franky508
-El destino es el que baraja las cartas, pero nosotros somos los que jugamos.
PASAROS POR AQUÍ:
http://www.hackxcrack.es/forum/index.php?topic=17844.msg100112
http://www.hackxcrack.es/forum/index.php?topic=17515.0
Imprimir
Páginas: [
1
]
Ir Arriba
Hack x Crack - Comunidad de Seguridad informática
»
Programación
»
Visual Basic
»
[Tutorial]Hacer una Minicalculadora
Va un mudo y le dice a un sordo: Hack x Crack usa cookies. Pues eso...
OK
Learn more