|
계산기를 초기상태로 초기화 한다.
intFstNum = 0
intSndNum = 0
intTrdNum = 0
intOperator = 0
historyCounter = 0
blCheck = False
blForlabel = False
blStart = False
lblWindow.Caption = \"\"
blCheckDot = False
End Sub
Private Sub cmdBack_Click()
\' 한칸지우기 버튼
If historyCounter = 0 Then
lblWindow.C
|
- 페이지 14페이지
- 가격 800원
- 등록일 2007.04.12
- 파일종류 한글(hwp)
- 참고문헌 없음
- 최근 2주 판매 이력 없음
|
|
비쥬얼 베이직을 이용하여 계산기를 만들었습니다. 기본적으로 비쥬얼 베이직이나 C+ 강좌를 들으실때
레포트로 자주 등장하는게 계산기 만들어서 가져오는 것입니다.
일반 계산기 다 동작하며, 추가로 Sin, Cos, Tan등 삼각함수 기능까지
|
- 페이지 3페이지
- 가격 2,000원
- 등록일 2008.04.07
- 파일종류 압축파일
- 참고문헌 없음
- 최근 2주 판매 이력 없음
|
|
^ Val(Text2)
Label1.Caption = \"^\"
End Sub//(제곱)
text1값의 text2제곱 값을 구하고
연산자를 label1에 표시
Private Sub end_Click()
MsgBox \"계산기를 이용해 주셔서 감사합니다.\"
End
End Sub//(종료)
프로그램을 종료한다.
메시지박스에 메시지가 표시된다.
|
- 페이지 3페이지
- 가격 2,000원
- 등록일 2008.04.26
- 파일종류 한글(hwp)
- 참고문헌 없음
- 최근 2주 판매 이력 없음
|
|
비쥬얼 베이직으로 제작한 공학용 계산기입니다.
|
- 페이지 1페이지
- 가격 1,000원
- 등록일 2007.12.10
- 파일종류 압축파일
- 참고문헌 없음
- 최근 2주 판매 이력 없음
|
|
Num(iCounter).Value = 1 Then
iChecker = iChecker + 1
End If
Next iCounter
If iChecker > 6 Then
MsgBox \"6개 이상 선택 못합니다.\"
Exit Sub \'숫자를 6개 초과로 선택하면 프로시저를 끝낸다.
End If
If optAutoSelect.Value = True Then \'자동 선택일 경우
If lblNum1.Caption = \"\" Then
Ms
|
- 페이지 23페이지
- 가격 1,000원
- 등록일 2007.04.12
- 파일종류 한글(hwp)
- 참고문헌 없음
- 최근 2주 판매 이력 없음
|