单选题
在窗体上画一个名称为Text1的文本框,再建立一个名称为Option1的控件数组(含3个单选按钮,标题分别为宋体、黑体、仿宋,下标从0开始),并编写如下程序代码:
Private Sub Option1_Click(Index As Integer)
Dim ft As String
Select Case _________________
Case 0
ft = "宋体"
Case 1
ft = "黑体"
Case 2
ft = "仿宋"
End Select
Text1.FontName = ft
End Sub
程序运行后,单击某个单选按钮,可将文本框的文本字体设置为相应的字体,则在横线处应填入的内容是