Просто чтобы расширить (правильные) ответы, уже предоставленные, вот полный пример кода использования Double.TryParse
:
Dim value As Double
If Double.TryParse(stringFromDataTable, value) Then
' text has been parsed as value, '
' so you can use value however you see fit '
Else
' text was not a valid double, so you can '
' notify the user or do whatever you want... '
' note that value will be zero in this case '
End If