【正确答案】[解析] 单选按钮的标题由Caption属性设置，检测单选按钮的状态通过Value属性来实现。如果单选按钮被选中，则Value值为1；没选中，Value值为0。当建立控件数组时，系统给每个元素赋一个惟一的索引号(Index)，通过属性窗口的Index属性，可以知道该控件的下标是多少；在窗体上显示信息通过Print方法实现，其形式为：
[对象.] print要显示的内容。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表18-3。
表 18-3

对　象	属　性	设　置　值
单选按钮	Name 　Caption 　Value	Op1 　北京 　flase
单选按钮	Name 　Caption 　Value	Op２ 　上海 　flase
单选按钮	Name 　Caption 　Value	Op２ 　广州 　flase
标签框	Name	Lable1

　　第二步：编写程序代码。
　　程序提供的代码：
　　　　Private Sub C1_Click()
　　　　' For i= ? To ?
　　　　' If Op1(i) ．?=True Then
　　　　' Print "我的出生地是"+Op1(i) .?
　　　　　　　　End If
　　　　　　Next
　　　　End Sub
　　参考代码：
　　　　Private Sub C1_Click()
　　　　　　For i=0 To Op1.Count-1
　　　　　　　　If Op1(i) .Value=True Then
　　　　　　　　　Print "我的出生地是"+Op1(i) .Caption
　　　　　　　　End If
　　　　　　Next
　　　　End Sub
　　第三步：调试并运行程序。
　　第四步：按题目要求存盘。
　　(2) [解析] 在窗体上建立好控件后，先设置控件的属性，再编写事件过程。
　　标签的标题由Caption属性设置，控件的高和宽分别由Height和Width属性来设置。控件的名称由Name属性设置，向组合框添加项目有两种方法，可以在“属性”窗口的List属性里直接添加，也可以在代码中添加。题目要求在设计时添加。字体和字号分别由控件FontSize属性和FontName属性来设置。解题步骤：
　　第一步：建立界面并设置控件属性。程序用到的控件及其属性见表18-4。
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　表　18-4

控　件	属　性	设　置　值
组合框	Name 　List	Cb1 　10 　15 　20
组合框	Name 　List	Cb2 　宋体 　隶书 　黑体
标签	Name 　Caption	B1 　字号
标签	Name 　Caption	B1 　字体
标签	Name 　Caption	L1 　计算机等级考试

第二步：编写程序代码。
参考代码：
Private Sub Cb1_Click()
L1.Font.Size=Cb1.Text
End Sub
Private Sub Cb2_Click()
L1.Font.Name=Cb2.Text
End Sub
Private Sub Form_Unload(Cancel As Integer)
Dim i As Long，j As Long
Open "out4.txt" For Output As #1
For i=0 To Cb1.LiStCount-1
Cb1.ListIndex=i
For j=0 To Cb2.ListCount-1
Cb2.ListIndex=j
Print #1，Cb1.Text & Cb2.Text & CInt(L1.Font.Size) & L1.Font
Next j
Next i
Close #1
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。