列表視圖vbnet

Question

我在查看ListView中保存的項目時遇到問題。

1是Item No ， c001是Item Code但是：

我的代碼出了什么問題？

ListView1.Items.Clear()

sql = "SELECT * FROM inventory"
Try
    dbcomm = New MySqlCommand(sql, dbconn)
    dbread = dbcomm.ExecuteReader()

    While dbread.Read
        ListView1.Items.Add(dbread("itemNo"))
        ListView1.Items.Add(dbread("itemCode"))
    End While

    dbread.Close()
Catch ex As Exception
    MsgBox("Error in collecting data from Database. Error is :" & ex.Message)
    dbread.Close()
    Exit Sub
End Try

Answer 1

您應該在SubItems而不是Items添加第二個Items 。 改變這個：

While dbread.Read
    ListView1.Items.Add(dbread("itemNo")) 'placed in row #1
    ListView1.Items.Add(dbread("itemCode")) 'placed in row #2
End While

成：

While dbread.Read
    ListView1.Items.Add(dbread("itemNo")).SubItems.Add(dbread("itemCode")) 'both placed in row #1
End While

這樣，您可以將它們並排放置。 不是一排又一排。

Answer 2

每次調用Items.Add它都會添加一個全新的項目（它還會返回對您添加的項目的引用）

您需要做的是設置您添加的每個項目的SubItem文本。 您可以使用返回的項目引用來執行此操作（需要Option Infer On ）：

    While dbread.Read
        Dim lvi = ListView1.Items.Add(dbread("itemNo"))
        lvi.SubItems.Add(dbread("itemCode"))
    End While