기금넷 공식사이트 - 복권 조회 - 1, 복권 생성 시스템: 무작위 2 색 복권 세트를 생성합니다 (1 ***7 자리 숫자, 처음 6 자리 무작위 범위는 1-33, 마지막 범위는 1-16).
1, 복권 생성 시스템: 무작위 2 색 복권 세트를 생성합니다 (1 ***7 자리 숫자, 처음 6 자리 무작위 범위는 1-33, 마지막 범위는 1-16).
dimgredball (32) as integer
dim redball (6) as integer
rnd (resize)
for k = k+1
next k
for j = ~ 5
k = int (rnd * (33-j))
redball (j) > 32 then
gredball (l) = gredball (l+1)
end if
next l
next j
redball ""& RedBall(1) & ""& RedBall(2) & ""& RedBall(3) & ""& RedBall(4) & ""& RedBall(5) & ""& RedBall(6))
VB 로 쓴 한 가지 대처를 보세요