有如下VB程序段,其功能是生成n个位于[1,10]之间的不重复随机整数: Dim a(1 To n) As Integer i= 1 Do While i<= a(i)= For j=1 To i-1 If a(i)=a(j) Then Exit For End If Next j i=i+1 Loop 上述程序段3个方框处的语句分别为( )
A . ①n ②Int(Rnd * 10+1) ③i=i -1
B . ①n ②Int(Rnd*9+1) ③i=i+1
C . ①n-1 ②Int(Rnd*10+1) ③i=i-1
D . ①n-1 ②Int(Rnd * 9+1) ③i=i+ 1
答案:A