有如下程序： Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum=0 art=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)\3 ThenSum=Sum+arr(i) End If Next i MsgBox Sum End Sub 程序运行后，单击窗体，消息框的输出结果为______。

感受法治，探究实践。（10分）

2012年12月4日是我国现行宪法颁布实施30周年纪念日。冀华中学九年级的同学们分成小组走出校门，开展了以“法在我们身边”为主题的社会实践活动。请你和他们一起行动吧！

第一组来到当地政府，看到新任命的国家机关工作人员正在手持《中华人民共和国宪法》进行就职宣誓。

探究一：手持宪法宣誓意味着什么？（4分）

第二组分头采访了运用法律手段讨薪的农民工、举报制售盗版光盘的消费者、按照程序查看政府“账单”的网民……

探究二：在这些人身上，体现出法治社会对公民的哪些要求？（4分）

第三组来到某高中，观看高中学生手捧宪法在成人仪式上宣誓。

探究三：手捧宪法，心有宪法。请以“我的成长与宪法”为题，写出你的内心感言。（2分）