>>1 
るしぇ様回答ありがとうございました。 
正しいかどうかわかりませんが下記のようにコードを変更したら正確に表示させることが出来ました。 
For n As Integer = 0 To 105 
  If Not GridName(n) Is Nothing Then 
     Dim View As New DataView 
     View.Table = dt 
     View.RowFilter = "抽出日 = #" & Date.Parse(LabelDate(n).Text).ToString("d") & "#" 
     GridName(n).DataSource = View 
  End If 
Next 
 
もし不具合点や改善点があるようでしたらご助言お願いいたします。