设有数组定义语句：Dim a(5) As Integer，并设List1为列表框控件。下列给数组元素赋值的语句错误的是( )。

A．a(3)=3

B．a(3)=inputbox("inputdata")

C．a(3)=List1.ListIndex

D．a=Army(1,2,3,4,5,6)

《刑法》第363条第1款规定：“以牟利为目的，制作、复制、出版、贩卖、传播淫秽物品的，处三年以下有期徒刑、拘役或者管制，并处罚金；情节严重的，处三年以上十年以下有期徒刑，并处罚金；情节特别严重的，处十年以上有期徒刑或者无期徒刑，并处罚金或者没收财产。”
试说明：

根据刑法理论确认该罪的犯罪构成。