請問如何取不重覆的值?(編號：8525)

程式如下:
Randomize
for i=1 to 4
a(i)=fix((25-1+1)+1
next i
如何能讓取出a(i)的值不重覆?