（20 ）设窗体上有名称为 Option1 的单选按钮，且程序中有语句：If Options.Value=True Then下面语

Option Base 1

Private Sub Command1_Click()

Dim city As Variant

city=_______(”北京”，”天津”，”上海”，”武汉”，”重庆”，”西宁”)

For i=_______ To UBound(city)

Combol．AddItem_______

Next

End Sub

在窗体上画一个名称为Labell的标签，然后编写如下事件过程： Option Base 1 Private Sub Form_Click() Dim a(20) As Integer For k=1 To 20 a(k)=k^2 Next k Label1.Caption=a(k) End Sub 程序运行后，单击窗体，在标签中显示的内容是 ______。

A．400

B．20

C．441

D．出错信息

A.5

B.10

C.15

D.20

设窗体上有名称为Optionl的单选按钮，且程序中有语句：

If Optionl．Value=True Then

下面语句中与该语句不等价的是

A．If Optionl．Value Then

B．If ptionl=True Then

C．If Value=True Then

D．If Optionl Then

A.A.k

B.B.Checkl.Caption

C.C.Checkl（k）

D.D.Checkl（Index）.Caption

A.5

B.10

C.15

D.20

窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Commandl的命令按钮。 运行后的窗体外观如下图所示。设有如下的类型声明： Type Person name As String*8 major As String*20 End Type 当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test290.dat中。设文本框中的数据已正确地赋值给Person类型的变量P。则能够正确地把数据写入文件的程序段是()。

A．Open"c:\Test29.dat"ForRandom As #1 Put#1，1，p Close#1

B．Open"c:\Test29.dat"ForRandomAs#1 Get#1，1，p Close#1

C．Open"c:\Test29.dat"ForRandomAs#1Len=Len(p) Put#1，1，p Close#1

D．Open"c:\Test29.dat"ForRandomAS#1Len=Len(p) Get#1，1，p Close#1

A.If Option1.Value Then

B.If Option1=True Then

C.If Value=True Then

D.If Option1 Then

Private Sub Option1_C1ick （Index As Integer ）

…

End Sub

下面关于此过程的参数 Index 的叙述中正确的是

A ） Index 为 1 表示单选按钮被选中，为 O 表示未选中

B ） Index 的值可正可负

C ） Index 的值用来区分哪个单选按钮被选中

D ） Index 表示数组中单选按钮的数量