Como se supone que Nombre es un capo de tipo texto, al compararlo debes poner comillas simples ' antes y después de la expresión, por lo que debería ser:
Código vb:
Ver originalSQL = "SELECT * FROM Personas WHERE Nombre = '" & Trim(Combo1.Text) & "'"