Есть ли эффективный метод в VB, чтобы проверить, может ли строка быть преобразована в double?

В настоящее время я делаю это, пытаясь преобразовать строку в удвоенную, а затем посмотреть, генерирует ли она исключение. Но это, кажется, замедляет мое приложение.

Try
    ' if number then format it.
    current = CDbl(x)
    current = Math.Round(current, d)
    Return current
Catch ex As System.InvalidCastException
    ' item is not a number, do not format... leave as a string
    Return x
End Try