在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序：

Private Sub Command1 Click()

Dim a(10) As Integer

Dim x As Integer

For i=1 To 10

a(i)=8+i

Next

x=2

Print a(f(x)＋x)

End Sub

Function f(x As Integer)

x=x＋3

f=x

End Function

程序运行后，单击命令按钮，输出结果为（）。

A．12

B．15

C．17

D．18

简述电视在激烈的大众传媒的竞争中采取的扬长避短的对策