Ботлнек String/StringBuilder

string source = File.ReadAllText(@"d:\work\words\source.txt", Encoding.GetEncoding(1251));
var sb_source = new StringBuilder(source, Source.Length);
Dictionary<string, int> F = new Dictionary<string, int>();
// ---
// тут вставляем код заполнения F, у меня получается около 70000 пар
// заполнение происходит очень быстро
// ---
foreach (var elem in F)
{
    // а вот тут был string и работало это, как мы все понимаем 200 лет
    // теперь тут StringBuilder, работает быстрее, но не слишком
    // можно сделать Parallels.ForEach, для моего i5 ускорится в ~4 раза
    sb_source = sb_source.Replace(elem.Key, "\0\0\0");
};

    /// <summary>Классы для пары ключ-количество.
    /// Помогает избежать дубоипующих запросов по словарю.</summary>
    public class FreqPair
    {
        public ulong Key { get; }
        public int Count { get; set; }
 
        public FreqPair(ulong key) => Key = key;
 
        public FreqPair(ulong key, int count)
            : this(key)
            => Count = count;
    }

       /// <summary>Возвращает словарь ключей и их количство в тексте.</summary>
       /// <param name="fileName">Имя файла в байтовой кодировке. Например, ASCII текст. </param>
       /// <param name="keyLength">Длина ключа.</param>
       /// <returns>Все найденные ключи и их количество.</returns>
       
        public unsafe static IDictionary<ulong, FreqPair> GetFreqs(string fileName, int keyLength)
        {
            if (keyLength < 1 || keyLength > 8)
                throw new ArgumentOutOfRangeException(nameof(keyLength));
 
            // Чтение всего файла в байтовый массив.
            byte[] source = File.ReadAllBytes(fileName);
 
            // Словарь для ключей. Количество ключей накапливается в свойстве Count значения словаря.
            Dictionary<ulong, FreqPair> freqs = new Dictionary<ulong, FreqPair>();
 
            // Переменная для ключа. Объявляется в не цикла чтобы не генерировать мусор.
            ulong key = 0;
            // Байтовая ссылка на ключ. Позволяет обращаться по адрессу к отдельным баытам ключа.
            byte* keyBytes = (byte*)&key;
 
            // Формирование первого ключа
            // Состоит из первых keyLength байтов источника
            // Запись байт обратная.
            for (int i = 0; i < keyLength; i++)
            {
                *(keyBytes + keyLength - 1 - i) = source[i];
            }
            // Добавление первого ключа в словарь.
            freqs.Add(key, new FreqPair(key, 1));
 
            // Цикл по всем байтом, кроме первых keyLength уже записанных в словарь.
            for (int i = keyLength; i < source.Length; i++)
            {
                // Очищается старшый байт ключа.
                *(keyBytes + keyLength - 1) = 0;
                // Ключ смещается на один байт
                key <<= 8;
                // В младший байт ключа
                *keyBytes = source[i];
                // В результате получаем в key последовательно
                // всю нарезку массива source по keyLength байт
                
                // Ищем ключ в словаре
                // Если находим - увеличиваем количество.
                // Иначе добавляем новый ключ с количеством = 1.
                if (freqs.TryGetValue(key, out FreqPair pair))
                    pair.Count++;
                else
                    freqs.Add(key, new FreqPair(key, 1));
 
            }
 
            return freqs;
        }

var list = new List<string>();
Dictionary<string, int> F = new Dictionary<string, int>();
// ---
// тут вставляем код заполнения F, у меня получается около 70000 пар
// заполнение происходит очень быстро
// ---
string res;
using (StreamReader sr = new StreamReader("text.txt", System.Text.Encoding.Default))
{
    string line = sr.ReadLine();
    if(F.ContainsKey(line)) line = "0";
    res += line;
}

string source = File.ReadAllText(@"d:\work\words\a.txt", Encoding.GetEncoding(1251));
byte[] byte_source = System.Text.Encoding.GetEncoding(1251).GetBytes(source);
int i2 = 0;
while (i2 < len)
{
    byte[] codesym_byte = new byte[1] { byte_source[i2] };
    if (FreqOrdered1.ContainsKey(Encoding.GetEncoding(1251).GetString(codesym_byte)))
        byte_source[i2] = 0;
    i2++;
}

byte[] byte_source = File.ReadAllBytes(@"d:\work\words\a.txt");