Dependendo de como os finais de linha de seu arquivo são formatados (vou assumir quebras de linha do Windows desde que você disse VB), você pode alternar o Modo de pesquisa para Estendido e faça algo assim:
Find what: strLine
Replace with: line1\r\nline2