vb編程題~~隨機產生20個不重復的A~Z之間的英文字母，按字母順序輸出，每行6個。

首先，定義20個數組。

然後在過程裏弄個for循環，比如for i = 1 to 20

利用隨機函數，生成65~90之間的函數，賦值到變量，比如 str=Int((90 - 65 + 1) * Rnd + 65)

再弄個for循環，比如for j = 1 to i

判斷是否重復 if 數組名(j)=str then

call 過程

exit sub

end if

next

然後給數組賦值 比如數組名(i)=chr(str)

next

end sub