Cómo usar VB para hacer una calculadora
1. Ejercicios básicos: Compile un dispositivo matemático para operaciones numéricas. Utilice VB para compilar un pequeño programa para cálculos matemáticos: "Mathematical Gadget 1", que calcula principalmente cuadrados, cubos, raíces cuadradas y senos. , coseno, tangente, cotangente, logarítmica y otras funciones. La interfaz del programa es la siguiente:
1. Problema de análisis:
Esta tarea implica principalmente operaciones matemáticas que se pueden utilizar para calcular cuadrados, valores cúbicos y raíces cuadradas. , senos, coseno, tangente y cotangente se pueden calcular utilizando funciones VB. (Funciones matemáticas de uso común en VB)
2. Diseño de algoritmo:
Flujo del programa: Ingrese los datos a calcular -> Resultados del cálculo -> Mostrar datos
Implementación de VB: TextBox Control de TextBox Control de etiqueta de expresión
3. Programación:
(1) Cree un nuevo proyecto EXE estándar en VB6.0
( 2) Cree un formulario y establezca las propiedades del formulario de la siguiente manera:
Nombre = Matemáticas
Título = "Gadget de matemáticas"
(3) En Agregar un texto box TextBox al formulario para ingresar valores calculados. La configuración de la propiedad es la siguiente:
Name=InputData
text="Ingrese un valor"
(. 4) Agregue otra etiqueta Etiqueta (mostrar puntuación) en el formulario y establezca las propiedades de la siguiente manera:
Nombre = Respuesta
Título = "Respuesta:"
(5) Agregue 8 botones CommandButton más al formulario, con los nombres sin cambios y los atributos (título) establecidos en: "cuadrado", "cubo", "cuarta potencia", "raíz cuadrada", seno" y " coseno" ”, “tangente”, “cotangente”.
(6) Haga doble clic en cada botón respectivamente y agrégueles código entre Private Sub y End Sub:
Private Sub Command1_Click()
XXXXXXXX. ........ Código (pueden ser varias líneas)
End Sub
(1) Código para botón cuadrado:
y=inputdata. text^2
respuesta.caption=y
(2) Encuentra el código del botón cúbico:
y=inputdata.text^3
respuesta.caption=y
(3) Encuentra el código del cuarto botón de encendido:
y=inputdata.text^4
respuesta caption=y
(4) Código para el botón de raíz cuadrada:
y=Sqr(inputdata.text)
respuesta.caption=y
(5) Encuentra el código del botón sinusoidal: y=Sin(inputdata.text*3.14/180)
answer.caption=y
(6) Encuentra el código del botón coseno Código: y=Cos(inputdata.text*3.14/180)
respuesta.caption=y
(7) Código para encontrar el botón tangente: y =Tan(inputdata.text* 3.14/180)
respuesta.caption=y
(8) Encuentra el código para el botón cotangente:
y= 1/Tan(inputdata.text* 3.14/180)
respuesta.caption=y
Si desea controlar el formato decimal del valor de salida, puede agregar una línea de declaración entre las dos líneas de código:
y=format(y,"0.0") 1 entero, 1 decimal
(7) Agregue 2 botones más CommandButton en el formulario, el los nombres permanecen sin cambios y las propiedades se establecen en: "Borrar", "Salir, hacer doble clic en cada botón respectivamente y agregarles códigos entre Private Sub y End Sub:
(1) Borrar código de botón :
inputdata.text=""
respuesta.caption=""
(2)Código del botón de salida:
Fin
Cuatro. Ejecute y pruebe el programa.
5. Guarde el archivo del programa fuente y genere el archivo exe.
2. Ejercicios extendidos: Compile un gadget matemático para operaciones con dos números. Utilice VB para compilar un pequeño programa para operaciones aritméticas con dos números y cuatro: "Mathematical Gadget 2", que incluye principalmente la suma. de dos números, resta, multiplicación, división, exponenciación y otras funciones. La interfaz del programa es la siguiente:
1. Problema de análisis:
Esta tarea implica principalmente operaciones matemáticas con dos números. Utilice dos cuadros de texto para ingresar datos y use botones para realizar cálculos del operador. Uso La etiqueta muestra el resultado y el operador entre dos números muestra el símbolo del operador correspondiente según el botón.
2. Diseño del algoritmo:
Flujo del programa: Ingrese los datos a calcular -> Resultados del cálculo -> Mostrar datos
Implementación de VB: Cuadro de texto (Dos ) Etiquetas de expresión
3. Programación:
(1) Crear un nuevo proyecto EXE estándar en VB6.0
(2) Crear un formulario, el formulario las propiedades se establecen de la siguiente manera:
Nombre = Maths2
Título = "Math Gadget 2"
(3) Agregue dos Dos cuadros de texto TextBox, los nombres permanecen sin cambios, respectivamente texto1, texto2, utilizado para ingresar valores calculados, borrar los valores de atributos de texto de los dos cuadros de texto
(4) Agregue otra etiqueta Etiqueta al formulario (operador de visualización), el el nombre no cambia, las propiedades se establecen en:
Nombre = Etiqueta1
Caption="?"
(5) En el formulario Agregar otra etiqueta Etiqueta (muestre el signo igual), mantenga el nombre sin cambios y establezca el atributo en "?".
Name = Label2
Caption="="
(6) Agregue otra etiqueta Label (para mostrar los resultados) en el formulario y establezca las propiedades de la siguiente manera:
Nombre = Respuesta
Caption="?"
(5) Agregue 4 botones más CommandButton en el formulario, el nombre permanece sin cambios y el atributo (caption) se establece respectivamente en: "suma", "resta", "multiplicación", "división" y "potencia".
(6) Haga doble clic en cada botón respectivamente y agrégueles código entre Private Sub y End Sub:
Private Sub Command1_Click()
XXXXXXXX. ........ Código (pueden ser varias líneas)
End Sub
(1) Agregar código de botón:
y=Val (Text1 .Text) + Val(Text2.Text)
respuesta.caption=y
label1.caption="+"
(2) Código del botón de resta: y=Val(Texto1.Texto) - Val(Texto2.Texto)
respuesta.caption=y
etiqueta1.caption="-"
(3 ) Código para el botón de multiplicación: y=Val(Text1.Text) * Val(Text2.Text)
respuesta.caption=y
label1.caption=" *"
(4) Código del botón de multiplicación: y=Val(Text1.Text) / Val(Text2.Text)
respuesta.caption=y
label1.caption= "/"
(5) Código para el botón de multiplicación: y=Val(Text1.Text) ^ Val(Text2.Text)
respuesta.caption =y
label1.caption="^"
Si desea controlar el formato decimal del valor de salida, puede agregar una línea de instrucción entre los dos códigos:
y= format(y,"0.0") 1 entero, 1 decimal
4.
5. Guarde el archivo del programa fuente y genere el archivo exe.