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

admin2006-08-15  95

问题 在窗体上画一个名称为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://kaotiyun.com/show/sr2p777K
0

最新回复(0)