[VB.NET] Caricaricamento variabile con StreamReader

[GhostFire]

Ciao a tutti,

ho creato questo codice che apre un file di testo e prende il testo dopo i ":" che decido con la variabile type. Il codice è il seguente:

    Public Sub loadRes(ByVal value As String, ByVal type As String, ByVal filepath As String)

        Dim SR As IO.StreamReader = New IO.StreamReader(filepath)

        Dim line As String = ""

        Do
            line = SR.ReadLine()

            If (line <> "") Then

                If (line.ToUpper().StartsWith(type)) Then

                    Dim TestArray() As String = Split(line, ":", 2)

                    value = TestArray(1)

                End If

            End If

        Loop Until line Is Nothing

        SR.Close()

    End Sub

Adesso quello che vorrei fare è inserire nella variabile che richiamerò tramite comando il valore che corrisponde al testo dopo i ":"

la variabile che voglio sostituire è value.

il codice non da problemi...però la variabile non viene caricata e quindi il valore è sempre corrispondente a 0.