类的声明是这样的:
Type TLine
Cur As Integer
ID As String
Point1 As Integer
Point2 As Integer
Weight As Long
Status As Integer
End Type
声明一个这个类的数组:
Public Line(1 To 14) As TLine下面这段代码:
If Line(i).Point1 = 1 Or Line(i).Point2 = 1 Then
'//这一句没有问题
Line(i).status=2
'//这里出现一个弹出框:“expected : list separator”
......
这里应该如何写才对呢?怎么对Line(i)的成员变量进行赋值?
Type TLine
Cur As Integer
ID As String
Point1 As Integer
Point2 As Integer
Weight As Long
Status As Integer
End Type
声明一个这个类的数组:
Public Line(1 To 14) As TLine下面这段代码:
If Line(i).Point1 = 1 Or Line(i).Point2 = 1 Then
'//这一句没有问题
Line(i).status=2
'//这里出现一个弹出框:“expected : list separator”
......
这里应该如何写才对呢?怎么对Line(i)的成员变量进行赋值?
把 Public Line(1 To 14) As TLine 改为 Public tLine(1 To 14) As TLine