[[질문]]비쥬얼베이직계산기 만들엇는데 오류가 뜨네요 뭐가 잘못됫는지좀 가를쳐주세요~

[klsky1]

 Option Explicit
Private su As Long
Private oper As Long
Private result As Long

Private Sub 곱하기_LostFocus()
oper = "*"
End Sub
Private Sub 나누기_LostFocus()
oper = "/"
End Sub

Private Sub 답_LostFocus()
oper = "="
End Sub

Private Sub 더하기_LostFocus()
oper = "+"
End Sub

Private Sub 떠블_LostFocus()
oper = "\"
End Sub

Private Sub 빼기_LostFocus()
oper = "-"
End Sub

Private Sub Form_Load()

End Sub

Private Sub Text1_lostfocus()
su = CLng(Text1.Text)

Text1.Text = "0"
result = oper

End Sub

Private Sub Text2_Change()
If oper = "+" Then
result = result + su
ElseIf oper = "-" Then
result = result - su
ElseIf oper = "*" Then
result = result * su
ElseIf oper = "/" Then
result = result / su
Else: oper = "\"
result = result \ su
Text2.Text = result
End If
End Sub

이렇게 햇는데 오류가 계속뜨네요 제가 뭘잘못한건인지좀가르쳐주세요 ㅠㅠ

[bigvoice]

oper 는 문자죠! String

[klsky1]

근데 그거하나바꿧는데 안되는데요 뭐가 더잘못된거같은데잘모르겟더요 정확하게좀 갈켜주세요 ㅠㅠ

[피오나미]

klsky1님 글 잘 보았습니다... 아래 자격증관련 정보도 있네요..

유망 직종 및 모든 자격증에 대한 자료를 무료로 제공 받을수 있습니다..

유망 자격증을 종류별로 무료로 자료들을 받아볼수 있다고 하네요.. 한번에 여러개 자료들을 받아볼수 있고

무료라 부담도 없으니 klsky1님도 무료로 받아보세요. 드레그해서 복사하세요 -> http://me2.do/5Z8bPkO