土地的自然供给是有限的，但是土地的经济供给总量可以通过增加经济投入不断扩大。（)A．正确B．错误

在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5)As String For i=1 To 5 a(I)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b； Next End Sub 程序运行后，单击命令按钮，输出结果是______。

A．ABCDE

B．1 2 3 4 5

C．abcde

D．出错信息

在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a(5)As String For i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后，单击命令按钮，输出结果是______。

A． ABCDE

B．1 2 3 4 5

C．abcde

D．出错信息

在窗体上面画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a＄="321"：b＄="abc" For j=l To 5 Print Mid＄(a＄，6-j，1)+Mid＄(b＄，j，1)； Next j End Sub 程序运行后，输出的结果是

A．alb2c3

B．ablc23

C．clb2a3

D．a12bcl

在窗体中画一个命令按钮，然后编写以下事件过程： Private Sub Command1＿Click() For X＝5 To 5 Step-6 Next X Print X End Sub 程序运行后，输出的结果是

A．2．2

B．2．5

C．2．9

D．-1

在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5)As String For i=1 To 5 a(I)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b； Next End Sub 程序运行后，单击命令按钮，输出结果是______。

A．ABCDE

B．1 2 3 4 5

C．abcde

D．出错信息

在窗体中画一个命令按钮，然后编写以下事件过程： Private Sub Command1_Click() For j=1 To 3 Print Tab(3(j)；11((2(j-1)； Next j Print End Sub 程序的执行结果为

A．11

B．33

C．11 33

D．11 33 55

在窗体画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=1234 c1=Trim(Str(c)) For i=1 To 4 Print Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： 1 12 123 1234 则在下划线处应填入的内容为______。

A．Rght(c1, i)

B．Left(c1, i)

C．Mid(c1, i, 1)

D．Mid(c1, i, i)

在窗体上面画一个命令按钮，然后编写如下事件过程______ 。 Option Base 1 Private Sub Command1_Click() Dim a a=Array(1，2，3，4) j=1 For i=4 TO 1 Step -1 s=s+ a(i)*j j=j*10 Next i Print s End Sub运行上面的程序，单击命令按钮，其输出结果是______ 。

A．4321

B．12

C．34

D．1234

在窗体中画一个命令按钮，然后编写以下事件过程： Private Sub Command1_Click() Forj=1 To 3 Print Tab(3*j)11*(2*j-1)； Next j Print End Sub 程序的执行结果为

A．11

B．33

C．11 33

D．11 33 55

在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。

A．15

B．18

C．21

D．24