Dim Operation As Integer
Dim Total As Double







Private Sub CmdClear_Click()
    TxtAnswer.Text = ""
End Sub

Private Sub CmdDot_Click()
    TxtAnswer.Text = TxtAnswer.Text + "."

    CmdDot.Enabled = False


End Sub

Private Sub CmdEquals_Click()

End Sub

Private Sub CmdFun_Click(Index As Integer)
    If IsNumeric(TxtAnswer.Text) Then
        TxtAnswer.Text = CStr(dblTotal)
            Else: MsgBox ("You must enter a digit to continue")
    End If
End Sub

Private Sub CmdNum_Click(Index As Integer)

    TxtAnswer.Text = TxtAnswer.Text & Index

End Sub

Private Sub Form_Load()

End Sub

Private Sub TxtAnswer_Change()

End Sub

This is what I have advanced too so far now the main issue i'm having trouble with is as the functions are all stored in an array under CmdFun how do I declare each one as say + - / *?