Having Trouble Making A Calculator In Vb6

[Wargod18]

i am trying to make an equal sign but when i click it if i have say 9+1 it equals 2 or if i give it 7+0 it equals nothing. i have it coded to work with only the add button right now i dont want to go any father until this is fixed.

Dim operand1 As Integer, operand2 As Integer
Dim ans As Integer

Private Sub CMDadd_Click()
  sign = "+"
  operand1 = Val(LBLans.Caption)
  LBLans.Caption = ""  'Clear for next number
  LBLsign.Caption = "+"
End Sub

Private Sub CMDans_Click()
If LBLsign.Caption = "+" Then
	operand1 = Val(LBLans.Caption)
	operand2 = LBLans.Caption
	ans = operand1 + operand2
	LBLans.Caption = ans
End If
End Sub

i am just starting to program in VB, i thought this would work but i guess not what am i doing wrong and what do i have to change, thanks in advance.

Edited September 24, 2006 by Wargod18