Problemas de programación de VB sobre los controles ComboBox TextBox y Label.
ListIndex = 0
Combo3.ListIndex = 0
End Sub
Sub privado Combo1_Click()
Estático IsClick1 como booleano
IsClick1 = No IsClick1
Si IsClick1 = Verdadero entonces
Label1.Caption = "Fuente actual: cursiva"
En caso contrario
Label1.Caption = "Fuente actual:
End If
End Sub
Private Sub Combo2_Click()
Estático IsClick2 As Booleano
IsClick2 = No IsClick2
Si IsClick2 = Verdadero Entonces
Label1.Caption = "Fuente actual: Fuente:
Fin
End Sub
Sub privado Combo3_Click()
IsClick3 estático como booleano
IsClick3 = No IsClick3
Si IsClick3 = True Entonces
Label1.Caption = "Fuente actual: cursiva, negrita, subrayado"
En caso contrario
Label1.Caption = "Fuente actual: cursiva , negrita, subrayado"
End If
End Sub