在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。 Private Sub Option1

admin2006-08-15 164

问题在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。

Private Sub Option1_Click(Index As Integer)
Select Case【】
Case 0
a = "宋体"
Case 1
a = "黑体"
Case 2
a = "楷体＿GB2312"
End Select
text1.【】=a
End Sub

选项

答案Index , FontName

解析

转载请注明原文地址:https://www.kaotiyun.com/show/sr2p777K

二级VB

相关试题推荐

随机试题

最新回复(0)