無效的屬性值在VB6

我有一個代碼，就在這裏，這是保存記錄DATABSE：無效的屬性值在VB6

If mstrMaintMode = "ADD" Then 

    lngIDField = GetNextCustID() 

    strSPName = "InsertCustomer" 

    Set objNewListItem = mylistview.ListItems.Add(, , txtname.Text) 
    PopulateListItem objNewListItem 
    With objNewListItem 
     **.SubItems(mlngCUST_ID_IDX) = CStr(lngIDField)** 
     .EnsureVisible 
    End With 
    Set mylistview.SelectedItem = objNewListItem 
    Set objNewListItem = Nothing 
Else 
    lngIDField = CLng(mylistview.SelectedItem.SubItems(mlngCUST_ID_IDX)) 

    strSPName = "UpdateCustomer" 

    mylistview.SelectedItem.Text = txtname.Text 
    PopulateListItem mylistview.SelectedItem 
End If

的錯誤是：在用星號線無效的屬性值。香港專業教育學院嘗試使用此代碼到另一個數據庫，它的工作原理，但另一個它沒有.ive檢查存儲過程，它是正確的，表字段，也是正確的，但即時通訊仍然得到這個error.ive花了3小時找到答案，但我無法弄清楚。

來源

2013-03-06 Soon To Be Revealed

錯誤與您的數據庫代碼無關。它對自己的價值抱怨。是否'mlngCUST_ID_IDX'引用有效（已創建）列索引？ – Deanna 2013-03-06 10:28:52

燁我intializes一個7，我真的不知道發生了什麼here..they不符合「CSTR（lngidfield）」等，這是什麼問題？ – 2013-03-06 14:40:34

而你實際上在列表視圖中有8列？ – Deanna 2013-03-06 14:46:35

你都強調，當你指定一個子項指數是出給定的列表視圖的列數界將失敗，出現「無效的屬性值」行。

由於索引爲1，但從第二列開始，索引爲7，所以至少需要添加8列。

來源

2013-03-06 14:50:17 Deanna

無效的屬性值在VB6

回答

相關問題