展开 vb产生10个不重复随机数