设有下列程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。
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．这位司机为了谋取到自己的利益不得不这样做