Red de conocimiento informático - Problemas con los teléfonos móviles - Utilice VB para programar los botones de selección.

Utilice VB para programar los botones de selección.

SubCheck1_Click() privado

Si Check1. Vale la pena

Texto1. Font.Bold = True

Otro

Texto1. Font.Bold = False

Finalizar si...

Finalizar conector

Subcheck2_Click privado()

Si check2. Vale la pena

Texto1. Font.Italic = True

Otro

Texto1. Font.Italic = False

Finalizar si...

Finalizar conector

Subcheck3_Click privado()

Si check3. Vale la pena

Texto1. Font.Underline = True

Otro

Texto1. fuente. Subrayado=falso

Terminará si...

Finalizar conector

Subcombinación privada1_Click()

Texto1. Fuente.Nombre = Combo1. Texto

Conector final

Subcomando privado 1_Click()

Fin

Conector final

Subventana privada Body_Load( )

Marcar I como un número entero

Filtro para i = 0. FontCount - 1

Combo1. Agregar pantalla de proyecto. Fuente(1)

Luego

Combo1. ListIndex = 0

Para i = 6 a 40, paso 2

Combinación 2. AddItem i

Luego

Combina 2. ListIndex = 12

Texto1. Fuente.Tamaño = Combo2. Texto

Conector final

Subopción privada1_Click()

Texto1. ForeColor = vbBlack

Conector final

Subopción privada2_Click()

Texto1. ForeColor = vbRed

Conector final

Subopción privada 3_Click()

Texto1. ForeColor = vbBlue

Conector final

上篇: Los monitores externos conectados a computadoras bajo el sistema XP solo pueden ser pantallas extendidas. ¿Cómo lograr una visualización sincrónica? 下篇:

Artículos populares