[비주얼베이직] 야구게임

등록일 2002.12.14 MS 엑셀 (xls) | 3페이지 | 가격 1,000원

목차

vba로 작성한 야구 게임입니다. 3자리 수를 맞추는 게임인데 모든 버그를 다 잡은 완벽한 자료입니다. 자리를 수를 늘려 만들때도 참조하여 만들면 좋을 것 같습니다.

본문내용

Private Sub cb1_Click()

Cells.Clear
Cells.ClearContents
Range("a26").Select

ActiveWindow.DisplayGridlines = False 'worksheet 환경 설정

Range("a1") = "n u m b e r "
With Range("a1").Font
.Size = 15
.Underline = xlUnderlineStyleSingle
.ColorIndex = 5
.Name = "휴먼매직체"
End With

Range("c1") = "R e s u l t"
With Range("c1").Font
.Size = 15
.Underline = xlUnderlineStyleSingle
.ColorIndex = 5
.Name = "휴먼매직체"
End With

trial = 0

For i = 1 To 10 ' 5번의 순환

If trial = 10 Then
GoTo ed
End If

trial = trial + 1 '순환의 가산

ag:
inta = InputBox(" 숫자를 맞춰보세요!!! ", " !! 신중한 판단 !!")

참고 자료

모든 버그를 잡은 완벽한 게임 프로그램 입니다.
      최근 구매한 회원 학교정보 보기
      1. 최근 2주간 다운받은 회원수와 학교정보이며
         구매한 본인의 구매정보도 함께 표시됩니다.
      2. 매시 정각마다 업데이트 됩니다. (02:00 ~ 21:00)
      3. 구매자의 학교정보가 없는 경우 기타로 표시됩니다.
      최근 본 자료더보기