word（5）中有6个单词，如何随机不重复读取？？

用 For...Next 循环 6 次，用 Rnd 随机抽取，然后判断抽取的单词在读取过的数组里一不一样，如果一样，就取消读取，继续循环；否则，将抽取的单词存储在读取的数组里。

开始循环之前，先用 Randomize() 来重新设置随机生成器。

[此贴子已经被作者于2006-2-8 15:40:56编辑过]

不太明白啊～～给个实例好吗？？

不如做个临时数组，记录原始数组下标，每抽取一个后，从临时数组中删去该值，随机数随机的是临时数组的下标，而临时数组的值是原始数组的下标，这样就能一次取完，不用象二楼，每次都要判断是否有重复出现