Red de conocimiento informático - Conocimiento del nombre de dominio - ¡Urgente! ! ! Programación VB: escriba un programa que utilice cuadros combinados para configurar la fuente y el tamaño del texto.

¡Urgente! ! ! Programación VB: escriba un programa que utilice cuadros combinados para configurar la fuente y el tamaño del texto.

Subcombo privado1_Click()

Text1.FontName = Combo1.Text

Fin Sub

Subcombo privado2_Click()

Text1.FontSize = Val(Combo2.Text)

End Sub

Sub privado Form_Load()

Combo1.AddItem "宋体"

Combo1.AddItem "黑体"

Combo1.AddItem "楷体_GB2312"

Combo1.Text = "宋体"

Para i = 12 a 72 Paso 2

Combo2.AddItem Str(i)

Siguiente i

Combo2.Text = "12"

Fin Sub