如何用BASIC语言编写 随机生成5个不重复的1到10之间的整数并输出的程序

1 声明一个变量a，用来保存生成的随机数
2 声明循环变量i，初值为0
3 声明一个数组n，大小为5
4 写一个while循环，循环条件i<5
循环体：先用随机数生成函数生成一个随机数，再乘以10，再用强制类型转换函数，把它转换为整型，把它赋给a
把a与数组n里的所有元素比较，如果a与其中一个元素相同，则退出本次循环，否则把a的值赋给数组n中下标为i的元素（如果BASIC的数组默认下标为0）
5 输出数组n中所有元素

10 FOR I=1 TO 5
20 LET A=10*RND(1)
30 LET B=INT(A)
40 PRINT B
50 NEXT
90 END

BASIC是十多年前学的，凭记忆做的，不知对否，请指正。

randomize
for i = 1 to 5
a = int(rnd * 10) + 1
print a
next
--------------
注意:
RND是取0-10间(包括0但不包括10)的数, 用int取整数后是0-9的数, 再加1即是1-10;

写在Form的click事件中
For i=1 to 5
a=fix(rnd*10)+1
print a
Next i