10/12/30 02:10:31 m1mXzDO60
丁度文字配列の勉強をしていた処なので参考にさせて貰いました。
id = GETID(GET_ACTIVE_WIN)
DIM MOJI[36] = "a", "b", "c", "d", "e",_
"f", "g", "h", "i", "j", "k", "l", "m", "n", "o",_
"p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z",_
"0", "1", "2", "3", "4", "5", "6", "7", "8", "9"
for j = 0 to 11
i = RANDOM(36)
SENDSTR( GETID(GET_ACTIVE_WIN), MOJI[i])
next
EXITEXIT
12桁に使用する文字に重複が認められる前提で記述してみました。
「これでも動作する」程度なので、修正箇所あれば指摘して頂けると助かります。