某公司的注册资本为人民币5000万元，法定盈余公积金累计为1250万元，该公司不再提取法定盈余公积金。 ( )

设有程序： Option Base 1 Private Sub Command1_Click() Dim arr1,Max as Integer arr1＝Array(12,435,76,24,78,54,866,43) 【12】 ＝arr1(1) For i＝1 To 8 If arr1(i)＞Max Then 【13】 Next i Print"最大值是:";Max End Sub 以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。