|
こんばんは。わたしも同様のケースで悩みました。。。
やじゅさんが書いているように、データバインドする前のデータソースとなる Datatableへ足りない行を追加してから、バインドしました。
つたないソースで申し訳ありませんが、貼り付けておきます。
Dim dt As DataTable = DataAccess.DataTableCreate(sqltext) '←Datatableに Dim row As DataRow Dim wkcnt As Integer = dt.Rows.Count
Dim j As Integer For j = wkcnt + 1 To pbUriageRow row = dt.NewRow() 'row("id") = j 'row("item") = "item " & j dt.Rows.Add(row) Next
EnterTabgrdList.DataSource = dt '''EnterTabgrdList.DataSource = DataAccess.DataTableCreate(sqltext)
|