设有下列程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer,i As Integer arr1=Array(12,435,76,-24,78,54,866,43) Min=arr1(1) For i=2 To 8 If arr(i)＜Min Then______ Next i Print"最小值是:";Min End Sub

以下哪些是造成轨道高低不平的原因（）。

A、道碴不洁，排水不畅通，路基长时间的浸泡，发生沉陷轨道变形

B、轨缝符合要求

C、道床捣固不实，特别是钢轨接头处捣固不实，产生空吊板

D、钢轨没有锁定，拱腰产生低接头