請高手幫忙，vb編程

妳好，這是我給妳寫的代碼，可以實現，望采納！

Private Sub Combo1_Click()

Label1.FontSize = Val(Combo1.Text)

End Sub

Private Sub Combo2_Click()

Label1.Font.Name = Combo2.Text

End Sub

Private Sub Form_Load()

Combo1.AddItem 10

Combo1.AddItem 20

Combo1.AddItem 30

Combo2.AddItem "黑體"

Combo2.AddItem "隸書"

Combo2.AddItem "楷體_GB2312"

End Sub

上一篇:請問計算機網絡技術(網站設計)專業是什麽，這個專業怎麽樣？

下一篇:matlab編程解復數方程