Visual Basic

Suma y resta
Propiedad “BackColor” escoger color “gris”
Propiedad “Caption” escribir “Sumar y Restar”
Con la herramienta de “LABEL”
dibujaremos 3 “labels”, como en
el ejemplo
A continuacioncolocaremos las siguientes propiedades iguales a los 3 “labels”
Color “Rosa”
Caption respectivo para cada label:
“Numero Uno”
“Numero Dos”
“Resultado”
Desde la caja de componentes, vamos adibujar ahora tres “TextBox”, como en la siguiente imagen,
A estos “TextBox” les eliminaremos el contenido de la propiedad “Text” para que el control salga en blanco.
Finalmente dibujaremos los“CommandButton” o “botones de comando”, como muestra la imagen siguiente
Seguidamente colocaremos la propiedad “Caption” de los botones con los nombres siguientes respectivamente
En la propiedad “Caption” decada “boton” introduciremos el texto respectivo,
Caption: &Salir
&Restar
S&alir
&Borrar
El formulario que hemos creado con los pasos anteriores tiene que tener el siguienteaspecto
3 -> labels 3 -> textbox 4 ->commandbutton
Ahora dentro de los siguientes componentes introduciremos el codigo, (recuerda que para acceder al codigo de cada componente haremos “2clics” en el componente)
En el boton de “Sumar” introduciremos la rutina
Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
En el boton de “Restar” introduciremosPrivate Sub Command2_Click()
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
End Sub
En el boton de “Salir”
Private Sub Command3_Click()
End
End Sub
En el boton de “Borrar”
Private SubCommand4_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text1.SetFocus
End Sub
DIVISION
Module MaxMinSuma
Sub Main()
Dim Numero As Integer = Nothing
Dim Digito As Integer= Nothing
Dim MaxDigito As Integer = Integer.MinValue
Dim MinDigito As Integer = Integer.MaxValue
Console.Write("Ingrese un número entero:")
Numero =...