HOLA!!!!!!!!
Hoy les voy a enseƱar a hacer un programa para calcular el area de un circulo, para ello, abrimos el programa y seleccionamos el tamaƱo de la ventana de puntos para poder colocar los Ćconos como queramos. Ahora colocamos el icono "Label" (Bueno esto es solo si quieren hacerlo), le colocamos el tĆtulo de "Area de un cĆrculo" (Les recuerdo que es solo si siquieren hacerlo), debajo colocamos otros dos de estos Ćconos y al primero le colocamos "Radio" y al segundo le colocamos "Area". DespuĆ©s seleccionamos uno de los Ćconos de la izquierda q se llama "TextBox" y lo colocamos al frente de los Ćconos anteriores ("Radio" y "Area"), les borramos el texto con el que aparecen ("Text") y buscamos al lado derecho la opciĆ³n q se llama "Enabled" y colocamos "False" (Esto es solo para el cuadro que van a colocar al frente de "Area"). DespuĆ©s colocamos un Ćcono del lado izquierdo del programa que se llama "CommandButton" y lo colocamos debajo de los anteriores Ćconos. Repetimos este paso otras dos veces mĆ”s y les cambiamos el nombre, el primero se va a llamar "Calcular", el segundo se va a llamar "Borrar" y el tercero se va a llamar "Salir". Seleccionamos el primero ("Calcular") y le damos doble click y nos aparecerĆ” una ventana en la que aparece un texto que dice:
"Private Sub Command1_Click()"
y debajo escribimos:
Text1.Text = Text1.Text
Text2.Text = Val(Text1.Text) * 3.1416 ^ 2
(Colocamos "* 3.1416" porque el area de un circulo se calcula asi: Radio por Pi elevado al cuadrado).
DespuƩs le damos doble click en "Borrar" y nos aparece lo siguiente:
"Private Sub Command2_Click ()"
debajo de eso escribimos lo siguiente:
Text1.Text = ""
Text2.Text = ""
DespuƩs de esto le damos doble click en "Salir" y nos aparece :
"Private Sub Command3_Click()"
debajo de esto escribimos:
"End"
y lo prueban y LISTO!!!!!!!! ya esta hecho el programa para calcular el area de un circulo.
Aqui los procedimientos ↓↓↓
Comenteten ↓↓↓
HACE FALTA ALGO EN LA PRIMERA LINEA DEL COMMANDO BUTTON
ResponderEliminarText1.Text = Text1.Text
no es radio por pi al cuadrado...
ResponderEliminares Pi por radio al cuadrado
verga guey no entendi
ResponderEliminarSOY JOTO
ResponderEliminarJajajajaja que gay
EliminarYo no entendĆ nada... ;-;
ResponderEliminarSi estan bien puestas algunas formulas, el problema es que le falto algo despues del text1 y no es text1 es
ResponderEliminarTextBox1.Text = "" y TextBox2.Text = "" (Son el comando para el boton Borrar)