Hi James,

The statement ..

Select Case strInput

.. says "compare strInput to each of the following Cases".

Next you have case #1 ..

Case (Len(strInput) = 0)

.. so it compares strInput to (Len(strInput) = 0)

and, whether it is True or False, it is NEVER equal to strInput, so the condition is never fulfilled and it moves on to check the next condition.

You must either use some other construct, or use ..

Select Case True

.. followed by a series of complete conditions.