未將對象引用設置爲對象的實例。 ListViewItem的VB.NET

-1

Private Sub btnInsert_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnInsert.Click 
    Dim myList As ListViewItem 

    Dim JmlList As Integer 
    Dim i As Integer 

    JmlList = lst_detail.Items.Count - 1 
    i = 0 

    myList = lst_detail.Items.Add(str(lst_detail.Items.Count + 1)) // error at this 
    myList.SubItems.Add(txtKodeObat.Text.Trim) 
    myList.SubItems.Add(txtNamaObat.Text.Trim) 
    myList.SubItems.Add(txtHarga.Text.Trim) 
    myList.SubItems.Add(txtQty.Text.Trim) 
    myList.SubItems.Add(txtJumlah.Text.Trim) 

    Dim subtotal As Double = 0 

    JmlList = lst_detail.Items.Count - 1 
    For i = 0 To JmlList 
     subtotal = subtotal + Val(lst_detail.Items(i).SubItems(5).Text) 
    Next 
    txtSubTotal.Text = Format(subtotal, "##########") 
    txtPPn.Text = Format(subtotal * 0.1, "##########") 
    txtTotal.Text = Val(txtSubTotal.Text) + Val(txtPPn.Text) 
    txtKodeObat.Text = "" 
    txtNamaObat.Text = "" 
    txtHarga.Text = "0" 
    txtQty.Text = "" 
    txtJumlah.Text = "0" 
    txtKodeObat.Focus() 

End Sub

我在myList中= lst_detail.Items.Add遇到錯誤（STR（lst_detail.Items.Count + 1））未將對象引用設置爲對象的實例。 ListViewItem的VB.NET

我想從文本添加到列表項，但得到零誤差我有填充該文本框

來源

2017-07-07 Muhammad Fahmi Hassan

你有調試它？在運行代碼時，您是否可以將lst_detail或lst_detail.Items視爲null？因爲基於錯誤，其中一個對象似乎爲空。 – Sujith

我很好奇你爲什麼要在該行中加1 Count。 – hatchet

@hatchet計數或編號列 –

lst_detail或lst_detail.Items似乎爲空。調試代碼，你應該可以看到其中的一個null。如果lst_detail爲空，並且您正在嘗試訪問lst_detail.Items，則會拋出「空引用」execption - 這意味着您正嘗試從具有空值的對象訪問某些內容。

來源

2017-07-07 03:54:57 Sujith

如果lst_detail或lst_detail.Items爲空，則上面的兩行分配將首先引發異常。 – hatchet

它看起來像你試圖從lst_detail中的特定索引中提取數據。我沒有測試下面的代碼，但類似下面的代碼可能會做你想做的事情。

myList中= lst_detail.Items.Add（lst_detail.Items [lst_detail.Items.Count + 1]的ToString（））

來源

2017-07-07 04:07:09 TheRock

未將對象引用設置爲對象的實例。 ListViewItem的VB.NET

回答

相關問題