Red de conocimiento informático - Material del sitio web - ¡Cómo comparar e imprimir X's if declaraciones de juicio antes y después de la comparación de valores en la programación VB y generar un valor!

¡Cómo comparar e imprimir X's if declaraciones de juicio antes y después de la comparación de valores en la programación VB y generar un valor!

Privado?Sub?Command1_Click()

Estático?x1?As?Long, ?x2?As?Long

x2?=?Rndz(1,?50)

Si?x2?gt;?20?Entonces

Imprimir?x2 ;

Si?x2?gt;?x1?Entonces

¿Imprimir? "Más grande que el anterior (o el primero)"

Si no

¿Imprimir?"Más pequeño que el anterior (o igual)"

¿Fin?