I ended up using a public function that could be called from the keypad form however I can't seem to get the masked edit box to take the strings correctly? Tha values from the keypad form are being passed correctly but I keep getting "invalid property" errors on the string handling.

Code:
Public Sub KeypadSelection(Value As Integer)
    ' code to change the approriate control
    Select Case Value
        Case 0
            mskItem.Text = mskItem.Text + "0"
        Case 1
            mskItem.Text = mskItem.Text & "1"
        Case 2
            mskItem.Text = mskItem.Text & "2"
        Case 3
            mskItem.Text = mskItem.Text & "3"
        Case 4
            mskItem.Text = mskItem.Text & "4"
        Case 5
            mskItem.Text = mskItem.Text & "5"
        Case 6
            mskItem.Text = mskItem.Text & "6"
        Case 7
            mskItem.Text = mskItem.Text & "7"
        Case 8
            mskItem.Text = mskItem.Text & "8"
        Case 9
            mskItem.Text = mskItem.Text & "9"
    End Select
End Sub