Quiero programar, pero no sé cómo. Descargué un VB. Si quiero programar un software de calculadora, ¿cómo debo programarlo?
VB es la abreviatura de Visual Basic
Basic es un lenguaje informático y la abreviatura de código de instrucción universal para principiantes. Se puede decir que es un lenguaje diseñado para principiantes.
Por supuesto, solo aprendí el código cuando estaba aprendiendo VB. Aunque el código está en inglés, sigue siendo relativamente simple, después de todo, este lenguaje está diseñado para principiantes.
El siguiente es el. código de programa de una calculadora, el cual solo puedo no explicar en detalle las operaciones de suma, resta, multiplicación, división, división de enteros y resto.
¿Opción?Explícito
Privado ?Sub?Command1_Click()
Texto2 .Texto?=?Texto1.Text
Texto3.Texto?=?"+"
Texto1.Texto?= ?""
Text1.SetFocus
Fin?Sub
Privado?Sub?Command2_Click()
Texto2.Text?=? Texto1.Text
Texto3.Text? =?"-"
Texto1.Text?=?""
Texto1.SetFocus
Fin?Sub
Privado?Sub ?Command3_Click()
Texto2.Text?=?Text1.Text
Texto3.Text?=?"*"
Text1.Text?=?" "
Text1.SetFocus
Fin?Sub
Privado?Sub?Command4_Click()
Texto2.Text?=?Texto1.Texto?'El texto del texto 2 es igual al texto del texto 1
Texto3.Text?=?"/"?'El contenido del texto 3 se cambia a "/"
Texto1. ¿Texto?=?""?'Borrar texto 1
Text1.SetFocus'El texto 1 obtiene el foco
End?Sub
Private?Sub?Command5_Click()
Dim?a?As?Double'Definir a como tipo de doble precisión
Seleccionar?Case? Text3.Text?'Juzgar el contenido del texto 3
Caso?"+"'Si es "+"
a?=?Val(Text2.Text)?+? Val(Text1.Text)?' Luego texto 1 más texto 2, su valor Asignar a a
Text1.Text?=?a?'Asignar a al texto 1
Caso ?"-"'Si es "-"
a?=?Val(Text2.Text)?-?Val(Text1.Text)?' Entonces el texto 1 menos el texto 2 se asigna a a
Texto1.Text?=?a?' Asignar a al texto 1
Caso?"*"'si es "*"
a?=? Val(Text2.Text)?*?Val(Text1.Text) ?'Entonces texto1 multiplicado por texto2, y su valor se asigna a
Text1.Text?=?a?'
Case?"/"'Si es "/"
a?=?Val(Text2.Text)?/?Val(Text1.Text)?' Entonces el texto 1 se divide por el texto 2. , y su valor se asigna a un
Text1.Text ?=?a?'
Case?"\"'Si es "\"
a?=?Val(Text2.Text)?\?Val(Text1.Text) ?' Entonces el texto 1 divide el texto 2 y se le asigna su valor.
Introduzca un
Texto1.Text?=?a?'
Caso?"Mod"?'if "Mod"
a?=?Val( Texto2 .Text)?Mod?Val(Text1.Text)?' Luego divida el texto 1 por el texto 2 para encontrar el resto y asigne el valor a
Text1.Text?=?a?' p>
¿Fin?Seleccionar?'Finalizar juicio
Fin?Sub
Privado?Sub?Command6_Click()
Texto2.Texto?=?Texto1 .Texto
Texto3.Texto?=?"\"
Texto1.Texto?=?""
Texto1.SetFocus
¿Fin? Sub
Privado?Sub?Command7_Click()
Text2.Text?=?Text1.Text
Text3.Text?=?"Mod"
Texto1.Texto?=?""
Texto1.SetFocus
Fin?Sub
Privado?Sub?CXDM_Click() p>
Form2.Show
End?Sub
Si desea comenzar, le sugiero que lea la "Introducción a la programación" de Hong En, que contiene VB (nivel de entrada). ). Busque otros tutoriales. Hay eMule por primera vez. Es algo bueno. Encontré muchos tutoriales, materiales y materiales allí...