I'm not sure how I would make an enumeration with fault tolerance for something like below. Would an enumeration be faster?

This is a truncated version. I have over 25 conversions for strings of various types:

vb.net Code:
  1. Public Function DoCvsn(ByVal TheInput As String, ByVal TheLength As Integer, ByVal CvsnCode As Integer) As String
  2.  
  3.         Dim TheOutput As String = ""
  4.  
  5.         Select Case CvsnCode
  6.  
  7.               Case 0
  8.                       TheOutput = TheInput
  9.  
  10.               Case 41
  11.                       TheOutput = TheInput.Substring(0, 2) + "/" + TheInput.Substring(2, 2) + "/" + TheInput.Substring(4, 4)
  12.  
  13.               Case Else
  14.                       TheOutput = TheInput
  15.  
  16.         End Case
  17.  
  18. End Function