作为确认暴利的利润标准，“四个同一”是指（）。

A.同一地区

B.同一时期

C.同一档次

D.同一价格

E.同种商品或服务

编写一个程序把一维数组的各元素反序存放。在主过程中调用subl过程把从键盘上输入的10个元素反序存放后再输出。根据题意，请完善下列程序。
Private Sub subl(b()As Integer, ByVal n As Integer)
Dim i As Integer, j As Integer, t As Integer
【13】
j=n
Do While i＜j
t=b(i):b(i)=b(j):b(j)=t
i=i+1:j=j-1
Loop
End Sub
Private Sub Command1_Click()
Dim a(1 To 10)As Integer, i As Integer
Randomize
For i=1 To 10
a(i)=Int(100*RnD) +1
Next i
For i= 【14】
Print a(i);
Next i
Print
Call 【15】
For i=i To 10
Print a(i);
Next i
Print n
End Sub