Brain Dump on code

T

tomrector

I am having a problem today;
I have this code in "Before Update" on form field ftxtCCard

Public Function CCVSModuleWindowCCNumberTester()
Dim CCVSAnswer As Boolean
Dim Number As String
Number = InputBox("Enter a Credit Card Number", "Enter a Number")
CCVSAnswer = CCValidationSolution(Number)
If CCVSAnswer = True Then
Number = OnlyNumericSolution(Number)
MsgBox Number & " is a valid number.", vbInformation, "Test
Result:"
End If
End Function

My actual credit card field name is ftxtCCard
I want to change from an "InputBox - and have the data I just put in
ftxtCCard pushed to Number.

This code is from
http://www.analysisandsolutions.com/software/ccvs/ccvs-vb.htm

Thanks for any help

Tom Rector
[email protected]
 
T

tomrector

Thanks Baz,
I'm in business !
Don't know what I was thinking,

Can move forward now ...
 
Top