Question

i have a string that looks like this

“Patient Name, Doc Name, Patient ID, something else”

i want to extract each one of these and put it in a variable. such that var1 will equal “Patient Name” var2 will equal “Doc name” etc.. using instr and mid. what is the best way to do it?

Answer 1

The best way to do it is using the Split function – here’s some vba code to do it:

Dim txt as String = "Patient Name, Doc Name, Patient ID, something else"
Dim x as Variant
Dim i as Long

x = Split(txt, ",")
For i = 0 To UBound(x)
   Debug.Print x(i)
Next i

And in VB.Net:

Dim txt as String = "Patient Name, Doc Name, Patient ID, something else"
Dim split As String() = txt.Split(",")
    For Each s As String In  split
        If s.Trim() <> "" Then
            Console.WriteLine(s)
        End If
    Next s