Talvez não seja possível usar o [método `String.Split()`][1] para esse propósito, expressões regulares podem vir a cair bem neste caso, use o [método `Regex.Split()`][2]:

<!-- language: lang-c -->

    Imports System.Text.RegularExpressions
    '

    Function ExtrairBlocos(ByVal texto As String) As List(Of String)
        Dim blocos As New List(Of String)
        blocos = Regex.Split(texto, "(""[^""]*""|\s+)").ToList()
        blocos.RemoveAll(Function(bloco) String.IsNullOrWhiteSpace(bloco))
        Return blocos
    End Function

E para utilizar, faça:

    Sub Main()
        Dim texto As String = "if ""esse campo tem espaços"" = true"
        Dim blocos As New List(Of String)
        blocos = ExtrairBlocos(texto)

        For Each bloco As String In blocos
            Console.WriteLine("{0}", bloco)
        Next
        Console.ReadLine()
    End Sub

[Ver `demonstração`][3]


  [1]: https://msdn.microsoft.com/pt-br/library/b873y76a%28v=vs.110%29.aspx
  [2]: https://msdn.microsoft.com/pt-br/library/8yttk7sy%28v=vs.110%29.aspx
  [3]: https://dotnetfiddle.net/TvjIsA