Bind di gridview

[supermac]

Perchè questa scrittura mi va in exception quando l'array di datarows dra è vuoto?

 Dim dtx As New DataTable
      ....
      If dtx.Rows.Count > 0 Then
          Dim dra As DataRow() = dtx.Select("LD_tipork IN ('A', 'D', 'N', '£', 'S')")
          gvpersfatture.DataSource = IIf(dra.Length > 0, dra.CopyToDataTable, Nothing)
          gvpersfatture.DataBind()
....

Mi va in exception quando definisco la datasource del gridview, mi dice "L'origine non contiene datarows" ma graziealca... volo, gli dico di usare Nothing come datasource