Red de conocimiento informático - Material del sitio web - ¿Cómo utilizar VB para crear un teclado de software? ¡Principalmente solo el teclado numérico!

¿Cómo utilizar VB para crear un teclado de software? ¡Principalmente solo el teclado numérico!

Coloque los siguientes controles en el formulario:

1. control de etiqueta lblResult Establezca lblResult.Caption = 0

2. a números pares (como: btnNum (0).

3. Agregue btnAdd (suma), btnSub (resta), btnMul (multiplicación), btnDiv (división), btnEnter (signo igual), btnReset ( borrar tecla cero) seis botones

Ingrese lo siguiente en el código de formulario:

Dim byteOperación como byte 'Operador

Dim byteTmp como byte 'Operación temporal Símbolo.

Dim intNum As Double 'Ingresar número

Sub Calc()

Seleccionar caso byteOperation

Caso 1 'Agregar

lblResult.

Caso 3 'Mul

lblResult.Caption = CDbl(lblResult.Caption) * intNum

Caso 4 'Div

lblResult.Caption = intNum / CDbl(lblResult.End If

Si lblResult.Caption = 0 Entonces

lblResult.Caption = Index

En caso contrario

If Len(lblResult.Caption) lt; 9 Entonces

lblResult.Caption = lblResult.Caption amp Index

If Len(lblResult.Caption) lt ; 9 Entonces

lblResult.Caption = lblResult.Caption Index

上篇: Cómo conectar Tank 500 a un teléfono Android 下篇: ¿Cómo son las instalaciones de apoyo alrededor de la comunidad Taiyuan Baiyun?

Artículos populares