Quebra de String em msgalert

Bom dia, possuo uma string que contém uma determinada quantidade de códigos de produtos, sempre separado por / a cada produto, existe alguma maneira de quebrar essa string? a intenção seria quebrar a cada 5 produtos, ou seja, a cada 5 "/" encontradas, exibindo o restante na seguinte linha. Segue um trecho do código e como está sendo exibido atualmente.

If MsgYesNo("Confirme a Liberação do Código:"+chr(13)+chr(10)+chr(13)+chr(10)+;
                    "CÓDIGO: "+cCodigo, "Aviso")

            cCodigosBKP := GetMv("MV_EXPCBAR")+RTRIM(cCodigo)+"/"
            cCodigosTST := RTRIM(GetMv("MV_EXPCBAR"))
            PutMv("MV_EXPCBAR", cCodigosBKP)

                If MsgYesNo("Produto Liberado "+cCodigo+chr(13)+chr(10)+chr(13)+chr(10)+;
                            "PRODUTOS ATUALMENTE LIBERADOS: "+cCodigosTST+chr(13)+chr(10)+chr(13)+chr(10)+;
                            "Deseja realizar outra liberação?", "Info")
                    u_LibProd()
                    else
                        MsgAlert("Operação Finalizada","")
                Endif

            Else
                MsgStop("Liberação Cancelada", "Aviso")
        endif

Existe a possibilidade do valor de cCodigosTST ser exibido com quebra de linha a cada 5 produtos por exemplo?