[비주얼 베이직] 비주얼 베이직(로또)
- 최초 등록일
- 2005.07.17
- 최종 저작일
- 2005.06
- 26페이지/ 한컴오피스
- 가격 2,000원
소개글
비베 로또 입니다. 파일 저장/열기가 되도록 했구요.
추첨등 다 됩니다. 소스와 실행 화면 있습니다.
본문에서 요구하는 그대로 만들었습니다.
목차
없음
본문내용
MDI폼으로 작성
-하나의 parent form과 두 개의 child form으로 구성
Parent form
-필수메뉴 “로또구입하기“, ”로또당첨확인“, ”종료“
-메뉴에 해당하는 툴바 또는 쿨바 생성시 보너스 점수
Child form
로또구입하기
-자동번호/수동번호 생성 가능
-구입한 번호는 저장되어야 한다.
-여러 장 구입 가능해야함(최대 5매 까지)
로또당첨확인
-당첨번호를 입력하고 당첨확인을 하면 각 매수별로 당첨된 번호를 체크하여 주고 등수를 확인하여 준다.
Option Explicit ‘변수선언요구
Private Sub end_menu_Click() '로또메뉴에서 종료를 클릭하면 종료
End
End Sub
Private Sub lotto_buy_menu_Click() '로또메뉴에서 로또구입을 클릭하면 form1창 로드
Load Form1
End Sub
Private Sub lotto_draw_menu_Click() '로또메뉴에서 로또추첨을 클릭하면 form2창 로드
Load Form2
End Sub
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
If Button.Index = 1 Then '버튼을 누르면 그 이름에 따라 발생
Load Form1 '로또구입을 누르면 form1창 로드
ElseIf Button.Index = 2 Then
Load Form2 '로또추첨을 누르면 form2창 로드
Else
End '종료를 누르면 종료
End If
End Sub
참고 자료
없음