Help, I'm trying to split a 3 digit number into 3 seperate variables.
Here is the snippet of code:

Select Case F1TOT
Case 1 To 9 'THIS IS GOOD
F1Tot1 = Right(F1TOT, 1)
F1Tot2 = "NULL"
F1Tot3 = "NULL"
Case 10 To 99 'THIS IS GOOD
F1Tot1 = Right(F1TOT, 1)
F1Tot2 = Left(F1TOT, 1)
F1Tot3 = "NULL"
Case 100 To 999 'THIS IS BAD
F1Tot1 = Right(F1TOT, 1)
F1Tot2 = Mid(F1TOT, 2, 1)
F1Tot3 = Left(F1TOT, 1)
Case Else
End Select


I need to solve this really quick. Any ideas?

Thanks