在下面程序的执行过程中，将要进行 【13】 次循环，而在第3次循环输出的数据是 【14】 。
Private Sub Command1 Click()
Dim b(-1 To 3)
For i=LBound(b，1)To UBound(b，1)
b(i)=2*i
Print i，b(i)
Next i
End Sub

传播过程包括三个要素，不属于这三个要素之一的因素是（）。

A.传者；

B.信息；

C.受者；

D.媒体。