從Datatable添加四列到列表視圖

我有DataTable中的列列表要添加在列表視圖中。我已經指定了列出來的順序出現列和數據以及。從Datatable添加四列到列表視圖

EmailAddress Subject  RecievedDate 
    [email protected]  Hello  02/06/2011 23:00

這種格式，以appear.Please任何人都可以幫助這個

編輯：

到目前爲止的代碼：

For i = 0 To objDataTable.Rows.Count drow = objDataTable.Rows(i) 
    Dim lvwItem As ListViewItem = New lvwItem(drow("SenderEmail"))  
    'lvwItem.SubItems.Add(drow("SenderEmail")) 
    lvwItem.SubItems.Add(drow("EmailSubject")) 
    lvwItem.SubItems.Add(drow("RecievedDate").ToString()) 
    lvwItem.SubItems.Add(drow("AssignedTo").ToString()) 
    LOV.Items.Add(lvwItem) 
Next

來源

2011-10-06 ShinyManu

你可以添加一些代碼來顯示你試過嗎？ – Ortund

對於i = 0到objDataTable.Rows.Count 卓爾= objDataTable.Rows（ⅰ）昏暗lvwItem作爲ListViewItem的=新lvwItem（卓爾（「SENDEREMAIL」））「lvwItem.SubItems.Add（卓爾（「SENDEREMAIL」）） lvwItem.SubItems.Add（drow（「EmailSubject」）） lvwItem.SubItems.Add（drow（「RecievedDate」）。ToString（）） lvwItem.SubItems.Add（drow（「AssignedTo」）。ToString（）） LOV.Items.Add（lvwItem） Next – ShinyManu

您的代碼示例看起來幾乎正確。一個錯誤是這一行：

Dim lvwItem As ListViewItem = New lvwItem(drow("SenderEmail"))

這應該是：

Dim lvwItem As ListViewItem = New ListViewItem(drow("SenderEmail").ToString())

除此之外，你需要確保你的列表視圖是詳細查看和你確實有你需要的列（否則什麼都不會當在細節視圖中示出）：

With listview1 
     .View = View.Details 
     .Columns.Add("Email Address") 
     .Columns.Add("Subject") 
     .Columns.Add("Recived Date") 
     'etc 
    End With

另外一個小的問題是這條線：

For i = 0 To objDataTable.Rows.Count

應該

For i = 0 To objDataTable.Rows.Count - 1

來源

2011-10-06 16:28:01

當試試這個我得到這行錯誤昏暗的lvwItem作爲ListViewItem =新的ListViewItem（卓爾（「SenderEmail」）） – ShinyManu

@ShinyManu - 什麼是錯誤？ –

我知道這是一個老問題，但似乎問題可能是該行應該看起來像這樣：Dim lvwItem As ListViewItem = New ListViewItem（drow（「SenderEmail」）。ToString（）） – Chillie

從Datatable添加四列到列表視圖

回答

相關問題