vb樂透程式(不重複) - Yahoo!奇摩知識+

Picture = LoadPicture(App.Path & "\樂透球" & n(j) & ".jpg") End Select i = i + 1 j = j + 1Loop請問要怎改才可以使數字不重複呢?(我做的數字1~9，只有四個球)

tw.knowledge.yahoo.com