Programación básica Volumen 2

dim Zheng, Fu, o, son números enteros

Ingrese en form_load.

Shu Ge=0

etiqueta 1. título = "entrar"; Shu Ge amp "número"

Zheng=0

fu=0

o=0

Label2.caption= "Los números positivos tienen"; Zheng

Label3.caption= "Los números negativos tienen"; Unidad de alimentación

etiqueta 4. caption = "Nothing";o

Luego ingresa texto1.

Si Shu Ge obtiene entonces 10

Cuadro de mensaje "Se ha ingresado el número de 10"

text1.text= " "

Otros

if val(text1.text)>Entonces 0

Zheng = Zheng 1

Label2.caption= "Hay un número positivo"; /p>

if val(text 1 . text) lt; entonces 1

fu=fu 1

Label3.caption= "Los números negativos tienen Fu";

Si val(text1.text)=0, entonces

o=o 1

etiqueta 4 .

Si... Terminará

Terminará si...

Terminará si...

Terminará si. ..

Pruébalo. El del segundo piso definitivamente funcionará. Mi método es realmente como uno escrito por un principiante. Lo que está escrito en el segundo piso debe escribirse después de estudiar un rato.