Public meterobj(0 To 10) As Lpin1
    Public meterobj713 As Class1
            meterobj713 = New Class1
            meterobj(1) = meterobj713
     meterobj(1).init()这些都是关于使用部分
下面是类class lpin1
Public Sub init() ‘’只进到这里 在6.0中时直接进入对于数据类中
    End Sub
对于数据的处理
类关于初始化和数据处理Class Class1
Inherits Lpin1‘’在6.0中用的是Implements Meter从网查的
   Private Sub lpin_init()        Dim i As Integer
        For i = 0 To 9
            xy2 = New LPdata
            a(i) = xy2
        Next
        a(1).Data4 = 10
        a(2).DataDot = 11
    End Sub在调用meterobj(1).init的时候不进入Class1中的lpin_init()在6.0中就直接进入写的不对 还是语句不对, 刚接触VB。net