비주얼 베이직인데;

추가 필요 변수
dot(boolean): 현재 소수점 이하인지 구분
소수점 이하 입력 가능하도록 수정
소수점 버튼 누르면 dot 변수 값 true, 평소에는 false
=, 연산버튼, C 누르면 false로 초기화

Private Sub Form_Load()

 Dim newnum As Boolean
 Dim op As String
 Dim num As Double
 Dim dot As Boolean
 
 dot = False
 num = Val(Text1.Text)
 
Private Sub Command18_Click()
  If dot Then
     Text1.Text = "."
     dot = True
  Else
  Text1.Text = Text1.Text & "."
  End If
 
End Sub

계산기 만드는 건데  . 한번 누르면 안눌려야되는데 왜 계속 눌릴까;;; 제발 좀 가르쳐줭;;;
(멍청하다고 욕해도 좋아;; 근데 나한텐 정말 프로그래밍이 너무어려워;;)