下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。
Private Sub Form_Click()
　　Dim an (10) As Integer
　　Dim max As Integer
　　Randomize
　 For i%=1 To 10
　　 an(i%)=______
　 Next i%
　　max=an(1)
　 For i%=2 To 10
　　　if______then
　　　 max=an(i%)
　　 End If
　 Next i%
　 print max
　 End Sub
End Sub

电动机装设过载保护装置，电动机额定电流为10A，当采用热元件时，其保护整定值为（）。

A．12A

B．15A

C．20A

D．25A