Вам нужно использовать эту простую формулу после извлечения значений из строки.
Dim strGPS As String = "Latitude: 34 deg 30' 28.71"" N"
Dim degrees As Double = CDbl(strGPS.Split(Space(1))(1)) '34
Dim minutes As Double = CDbl(strGPS.Split(Space(1))(3).Replace("'", "")) '30
Dim seconds As Double = CDbl(strGPS.Split(Space(1))(4).Replace("""", "")) '28.71
MsgBox(degrees + (minutes / 60) + (seconds / 3600))