I`ve done all the work and the numbers appear in the textbox, but when I press equl it does not give the result!
Protected Sub EqlBtn_Click(ByVal sender As Object, ByVal e As EventArgs) Handles EqlBtn.Click
If txtentr.Text.Length > 0 Then
Select Case Vals
Case 1 '
txtentr.Text = Store / Val(txtentr.Text)
Case 2
txtentr.Text = Val(txtentr.Text) * Store
Case 3
txtentr.Text = Store - Val(txtentr.Text)
Case 4
txtentr.Text = Val(txtentr.Text) + Store
End Select
Else
txtentr.Text = String.Empty
End If
'store is the first number entered.
where is the problem here ?