[비주얼베이직] 구구단 소스

목차

<<구구단 소스!!^^>>
<<소스캡쳐!!-1>

본문내용

Option Explicit

Dim intMulti(2 To 9, 1 To 9) As Integer '결과값 저장 변수 선언

Private Sub cmddan_Click()
Dim intDan As Integer '단을 저장할 변수 선언
Dim intNum As Integer

intDan = CInt(txtmulti.Text) '텍스트 박스에 입력한 단을 저장
lblmulti.Caption = "" '레이블의 내용을 지움

참고 자료

비주얼 베이직 바로가기 6.0 연습문제