Ecco una semplice funzione che permette di estrarre una serie di numeri da una stringa:

Public Function ExtractDecimalValues(ByVal Text As String) As List(Of Decimal)
       Dim result As New List(Of Decimal)
 
       Dim oMatch As Match
       Dim oMatchCollection As MatchCollection
       Dim oRegEx As New Regex("[\d]+[{\.,\,}]?[\d]+")
 
       oMatchCollection = oRegEx.Matches(Text)
       Dim strResult As String = String.Empty
       For Each oMatch In oMatchCollection
           strResult = Convert.ToDecimal(oMatch.Value.ToString.Trim())
           result.Add(strResult)
       Next
       Return result
   End Function

Altri Articoli

VB.NET: IsBoolean Funzione per verificare se una v...
views 393
Con questa semplice funzione è possibile verificare se una varibile sia di tipo boolean:    Public Function IsBoolean(ByVal Value As ...
VB.NET: Creare un report in diversi formati e apri...
views 230
Ecco un semplice script che permette di generare un report in vari formati con un datasource e aprire il file creato:   Public Shared Function ...
VB.Net: Convertire un documento Word in PDF senza ...
views 141
Una soluzione alternativa per convertire un documento Word puo' essere l'utilizzo di una stampante pdf, in questo caso utilizzeremo Bullzip Pdf Prin...
VB.NET: Verificare se l’utente corrente è un...
views 103
Con questa funzione possiamo verificare se l'utente corrente fa parte del gruppo degli aministratori della macchina: Public Function IsCurrentUserAd...