为了准备五校联考，小卷王买了n套卷子，每套卷子数量不等，第i套试卷有a(i)张。小卷王每天可以将第i套到第j套卷子各做完一张。作为同学，小汤想要知道小卷王最快几天可以做完全部的卷子，因此小汤编写了下面这个程序，但他有几个空不知道该写什么，请求你的帮忙。

Private Sub Command1_Click()

    For i = 2 To n

        If a(i) > a(i-1) Then   ①    

    Next i

    Text1.Text =   ②   

End Sub

下列选项中，①②中的代码填写正确的是（       ）

A、①ans = ans + a(i) - a(i-1)       ②Str(a(1) + ans)

B、①ans = ans + a(i) - a(i-1)        ②Str(ans)

C、①ans = a(i) - a(i-1)               ②Str(a(1) + ans)

D、①ans = a(i) - a(i-1)               ②Str(ans)