로또번호 추출기 프로그램

오늘 포스팅할 주제는 로또번호 추출기 프로그램 입니다.

​

우선 VS2022를 실행시키시고 새프로젝트를 선택합니다.

windows form 앱을 선택하고 다음버튼을 누르세요

프로젝트이름을 로또번호추출로 적으시고 해당 소스파일이 저장될 위치를 선택하신 후에

다음 버튼을 누르시면 아래와 그림과 같은 화면이 나타납니다.

그럼 이제부터 컨트롤 하나하나 추가해서 기본화면을 만들어보겠습니다.

좌측도구상자 에서 NumericUpDown , Label , Button, Listview 를 끌어다가

화면에 배치시킵니다.

폰트는 적당히 크게 조절합니다.

NumericUpDown컨트롤의 속성값중 Minimum값을 1로 Maximum을 100으로

설정하고 increment값은 1로 줍니다.

위 화면처럼 컨트롤 배치기 되었으면 코딩을 해보도록하겠습니다.

우선 내가원하는 세트만큼 번호를 추출하겠다고하면 반복문을 쓰면 되겠죠~~~

for i as integer = 0 to NumericUpDown1.Value

'여기에 번호추출 소스코딩

next

​

​

버튼이벤트에 만든 소스입니다.

​

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

For i As Integer = 1 To NumericUpDown1.Value

Dim rand As New Random()

Dim lottoNumbers As New List(Of Integer)

​

While lottoNumbers.Count < 6

Dim num As Integer = rand.Next(1, 46)

If Not lottoNumbers.Contains(num) Then

lottoNumbers.Add(num)

End If

End While

​

Dim SelNum As String = ""

For Each num In lottoNumbers

SelNum = SelNum & num & " "

Next

ListBox1.Items.Add(SelNum)

Next

End Sub

​

위와같이 코딩하여 실행시킨 후에 5세트를 추출하라고 번호추출 버튼을 클릭 하면

위와같은 결과를 얻을 수 있습니다.

​

여러분도 한번 만들어보세요

​

이화면은 가장간단한것이고 여기에 다른 조건들

예를들어 잘맞는다는 숫자의 합이 110~150 사이라고하면 이런 조건들을 넣어서

코딩하면 되겠죠~~~~~

​

여러분이만든 프로그램으로 번호추출하여 대박나세요