关于一个VB转vb.net的问题

时间:2021-11-19 13:06:12
vb里自定一个数据类型,但是vb.net好像写法又不一样了
    Type SCode
       data(400) As Byte
       
    End Type
请问转换成vb.net怎么转换?
    

4 个解决方案

#1


非要用Type,就这样:
Structure SCode
        <VBFixedArray(400)> Dim data() As Byte
        Public Sub Initialize()
            ReDim data(400)
        End Sub
    End Structure

#2


引用 1 楼 bdxzq 的回复:
非要用Type,就这样:
Structure SCode
        <VBFixedArray(400)> Dim data() As Byte
        Public Sub Initialize()
            ReDim data(400)
        End Sub
    End Structure

不是非得用type。。。我只是从他VB里的提取出来转换成vb.net,有更好的也可以用啊~

#3


本帖最后由 caozhy 于 2017-09-06 11:26:39 编辑
Structure SCode
       public data() As Byte = new Byte(400)
       
    End Structure

#4


引用 3 楼 caozhy 的回复:
Structure SCode
       public data() As Byte = new Byte(400)
       
    End Structure

Error 116 Initializers on structure members are valid only for 'Shared' members and constants. D:\生产测试交接\RF\Source Code-20170901ljs\csr_engine.vb 213 16 Anritsu BlueTest2
?怎么出现这个错误了。。。

#1


非要用Type,就这样:
Structure SCode
        <VBFixedArray(400)> Dim data() As Byte
        Public Sub Initialize()
            ReDim data(400)
        End Sub
    End Structure

#2


引用 1 楼 bdxzq 的回复:
非要用Type,就这样:
Structure SCode
        <VBFixedArray(400)> Dim data() As Byte
        Public Sub Initialize()
            ReDim data(400)
        End Sub
    End Structure

不是非得用type。。。我只是从他VB里的提取出来转换成vb.net,有更好的也可以用啊~

#3


本帖最后由 caozhy 于 2017-09-06 11:26:39 编辑
Structure SCode
       public data() As Byte = new Byte(400)
       
    End Structure

#4


引用 3 楼 caozhy 的回复:
Structure SCode
       public data() As Byte = new Byte(400)
       
    End Structure

Error 116 Initializers on structure members are valid only for 'Shared' members and constants. D:\生产测试交接\RF\Source Code-20170901ljs\csr_engine.vb 213 16 Anritsu BlueTest2
?怎么出现这个错误了。。。