로또번호 생성기입니다.

소개글

비주얼 베이직 닷넷2005로 만들었습니다. 간단하게 6개 숫자와 1개의 보너스번호를 랜덤하게 생성하고
생성된 번호들끼리 중복된 값이 없도록 만들었습니다.

루프문공부하기엔 가장 좋은 예가 로또번호 발생기인데 이 소스가 많은 도움이 되었으면 좋겠네요..


닷넷2005이상인 버전에서 완벽하게 프로젝트가 열립고, 2005이하 버전은 열리지 않습니다.
이때는 Form1.vb파일을 메모장으로 열어서 소스를 보실수 있습니다.

소스요약)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'//로또 번호 생성한다.
MakeNansu()

'//생성된 수를 일차원변수값으로 전환한다.
Dim makesu As String = Join(sumake, ",")

'//리스트박스에 표시한다.
ListBox1.Items.Add(makesu)

'//생성된 배열값 지움
Array.Clear(sumake, 0, 6)
End Sub

컴파일 실행환경

Visual studio 2005, Visual studio 2008

참고 자료

없음