Программа виснет при чтении большого файла

StreamReader^ sr = gcnew StreamReader(openfile->FileName);
                int NxINF = Convert::ToInt32(datagrid[1, 7]->Value->ToString());
                int NyINF = Convert::ToInt32(datagrid[1, 8]->Value->ToString());
                int NzINF = Convert::ToInt32(datagrid[1, 9]->Value->ToString());
                int NxyzINF = (NxINF + 1) * (NyINF + 1) * (NzINF + 1);
                double* EXINF = new double[NxyzINF + 1];
                double* EYINF = new double[NxyzINF + 1];
                double* EZINF = new double[NxyzINF + 1];
                int i, j, k, s;
                array<String^>^ EXYZINF = gcnew array<String^>(3);
                statusbar->Maximum = NxINF;
                statuslable->Text = "Loading TOSCA table file...";
                Application::DoEvents();
                for (size_t p = 0; i < 5; i++)
                {
                    sr->ReadLine();
                }
                while (!sr->EndOfStream && (j < NxINF + 1))
                {
                    for (j = 0; j < NxINF + 1; j++)
                    {
                        statusbar->Value = j;
                        Application::DoEvents();
                        for (i = 0; i < NyINF + 1; i++)
                        {
                            for (k = 0; k < NzINF + 1; k++)
                            {
                                s = k + i * (NzINF + 1) + j * (NzINF + 1) * (NyINF + 1);
 
                                EXYZINF = sr->ReadLine()->Split(gcnew array<String^>{" "}, StringSplitOptions::RemoveEmptyEntries);
                                EXINF[s] = double::Parse(EXYZINF[0]);   // V/m
                                EYINF[s] = double::Parse(EXYZINF[1]);
                                EZINF[s] = double::Parse(EXYZINF[2]);
                            } //i
                        } //j
                    } //k
                }
                sr->Close();
 
                delete[] EXINF;
                delete[] EYINF;
                delete[] EZINF;

EXINF[s] = double::Parse(EXYZINF[0]);
        EYINF[s] = double::Parse(EXYZINF[1]);
        EZINF[s] = double::Parse(EXYZINF[2]);

EXINF[s] = Convert::ToDouble(EXYZINF[0]);
    EYINF[s] = Convert::ToDouble(EXYZINF[1]);
    EZINF[s] = Convert::ToDouble(EXYZINF[2]);