现在我编写了将数组列表值复制到另一个数组列表中的代码。这是我的代码。
Try
Dim billtypeList As New ArrayList
If frm.cbOriginal.Checked Then
billtypeList.Add("o")
ElseIf frm.cbduplicate.Checked Then
billtypeList.Add("d")
ElseIf frm.CBTrplicate.Checked Then
billtypeList.Add("t")
Else
For i = 0 To AIMSpecific.G_Bill_Types.Count - 1
billtypeList.Add(AIMSpecific.G_Bill_Types.Item(i).value)
Next
End If
Catch ex as exception
msgbox.show(ex.message)
end try
我收到这样的错误消息,
MissingMemberException was Caught:
Public member 'value' on type 'ObjectCollection' not found.
请指导我,提前谢谢。 : - )
Public class Aimspecific
public shared G_BillType as new arraylist
end class
Aimspecific是我的基本常量类,用于存储项目的常量变量。
答案 0 :(得分:0)
在你的代码中,在你通过AIMSpecific.G_Bill_Types循环的else部分中,当你获得值时,你写 AIMSpecific.G_Bill_Types.Item(i).value 这是错误的,正确的语法应该 AIMSpecific.G_BillType(i)或您对象中的任何内容。根据您的定义,G_Bill_Types应为G_BillType 下面,将是正确的语法
For i = 0 To AIMSpecific.G_BillType.Count - 1
billtypeList.Add(AIMSpecific.G_BillType(i))
Next