finish first pass of switching to TextEdit

app/TaskFlow/ClassFormat.vb

@@ -57,4 +57,26 @@ Public Class ClassFormat
 
         Return oConvertedValue
     End Function
+
+    Public Shared Function GetStringValue(pValue As Object) As String
+        Select Case pValue.GetType
+            Case GetType(Single)
+                Return DirectCast(pValue, Single).ToString(CultureInfo.InvariantCulture)
+
+            Case GetType(Double)
+                Return DirectCast(pValue, Double).ToString(CultureInfo.InvariantCulture)
+
+            Case GetType(Decimal)
+                Return DirectCast(pValue, Decimal).ToString(CultureInfo.InvariantCulture)
+
+            Case GetType(Date)
+                Return DirectCast(pValue, Date).ToString(CultureInfo.InvariantCulture)
+
+            Case GetType(DateTime)
+                Return DirectCast(pValue, DateTime).ToString(CultureInfo.InvariantCulture)
+
+            Case Else
+                Return pValue.ToString
+        End Select
+    End Function
 End Class