[Anas Mahmoud]

المشكلة كانت في السطر رقم 182

كود :

               e.Graphics.DrawString(DataGridView1.Rows(r).HeaderCell.Value.ToString , DataGridView1.Font, Brushes.Black, cell, sf)

كلما بحث عن القيمة وجدها nothing
وتم حلها بالتحقق اولا من القيمة اذا كانت لاشيء نقوم برسم نص فارغ 

كود :

               e.Graphics.DrawString(If(DataGridView1.Rows(r).HeaderCell.Value, String.Empty), DataGridView1.Font, Brushes.Black, cell, sf)