错误消息“使用new关键字来创建一个对象实例”

Question

我一直具有ArrayGroup(count).dateDate = valueListString(0)错误信息，不知道什么是错用下面的代码，请大家帮忙。

Structure dataAttribute 
    Dim dateDate As Date 
    Dim timeString As String 
    Dim volString As String 
    Dim openString As String 
    Dim closeString As String 
    Dim minString As String 
    Dim maxString As String 
End Structure 

Private ArrayGroup() As dataAttribute 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)  Handles Button1.Click 
    Dim currencyString As String 
    Dim valueListString() As String 

    currencyString = dataTextFieldParser.ReadToEnd 
    RichTextBox1.Text = currencyString 

    strArr = currencyString.Split(Environment.NewLine) 

    For count = 1 To strArr.Length - 1 
     valueListString = strArr(count).Split(";") 

     ArrayGroup(count).dateDate = valueListString(0) 
     ArrayGroup(count).timeString = valueListString(1) 
    Next 


End Sub 

Answer 1

ArrayGroup是Nothing。

行

Private ArrayGroup() As dataAttribute 

不分配一个值ArrayGroup所以它不会被实例化，当您尝试使用它，你会得到正常的使用块错误。

您可能想要将功能的末尾更改为类似的内容。

Redim ArrayGroup(strArr.Length - 1) As dataAttribute 


    For count = 1 To strArr.Length - 1 
     valueListString = strArr(count).Split(";") 

      ArrayGroup(count).dateDate = valueListString(0)   
      ArrayGroup(count).timeString = valueListString(1)  
    Next 
End Sub 

请注意ReDim。我不确定你是否需要As。

Answer 2

ArrayGroup可能确实在其中包含项目。

所以前行ArrayGroup(count).dateDate = valueListString(0)尝试添加到阵列

ArrayGroup(count) = New ... what ever type should be in the array... 

Answer 3

它不会出现你的尺寸你数组：

尝试

使用ReDim ArrayGroup（0）

看看ReDim和ReDim Preserve

Private ArrayGroup() As dataAttribute 

只是声明ArrayGroup是数据属性类型的数组，但不指定多少成员都在上面。