將文本追加到數據表中的現有行

Question

我試圖在vb.net中創建日曆，並且遇到了此問題。我想將一些文本附加到現有的數據錶行中。當我看着我的調試器時，它說：「爲了評估索引屬性，屬性必須是合格的，並且參數必須由用戶明確提供。」

Dim aantalRijen As Integer = 1 

    For x = 0 To 6 
     Dim dttopdrachten As New DataTable 
     dttopdrachten = opdrachtendao.getOpdrachtenByDate(Today.AddDays(x)) 
     If dttopdrachten.Rows.Count > aantalRijen Then 
      aantalRijen = dttopdrachten.Rows.Count 
     End If 
    Next 

    For z = 0 To aantalRijen - 1 

     Dim r As DataRow 
     r = dttAgenda.NewRow() 
     dttAgenda.Rows.InsertAt(r, z) 

    Next 

    For i = 0 To 6 

     Dim aantalItems As Integer = 0 
     Dim dttopdrachten As New DataTable 
     dttopdrachten = opdrachtendao.getOpdrachtenByDate(Today.AddDays(i)) 
     aantalItems = dttopdrachten.Rows.Count 

     For j = 0 To aantalItems - 1 

      Dim info As String = dttopdrachten.Rows(j).Item(0).ToString & vbCrLf & dttopdrachten.Rows(j).Item(2).ToString & vbCrLf & dttopdrachten.Rows(j).Item(3).ToString & vbCrLf & dttopdrachten.Rows(j).Item(4).ToString & vbCrLf & dttopdrachten.Rows(j).Item(5).ToString & vbCrLf & dttopdrachten.Rows(j).Item(6).ToString 
      dttAgenda.Rows(j).Item(i) = info 

     Next 

    Next 

    dgvAgenda.DataSource = dttAgenda 

在上面的代碼中，我首先計算我必須做多少行。之後，我將大量的行添加到數據表（列之前添加）。直到這裏它的工作，但是當我繼續調試時，我得到的錯誤。我嘗試了谷歌搜索，但迄今沒有任何可以幫助我。

Answer 1

似乎問題已解決，但沒有改變任何東西。所以如果有人想製作日曆。這裏的解決方案;）