For i = 1 To 10
If a(i) >= 0 Then
n=n+1
List1.AddItem Str(a(i))
Else
m=m+1
List2.AddItem Str(a(i))
Next
则该程序段出错的原因是缺少了( )
①共产党员的先锋模范作用
②多党合作的根本活动准则
③党的宗旨是建设法治国家
④***以人民利益为己任