加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 百科 > 正文

将VB6模块转换为VB.NET

发布时间:2020-12-17 07:19:56 所属栏目:百科 来源:网络整理
导读:我几乎完成了将模块从VB6转换为VB.NET,但是我遇到了以下2个引号的问题,我想知道是否有任何方法可以解决这个问题: Structure AUDINPUTARRAY bytes(5000) As ByteEnd Structure 我正在尝试将该字节行更改为:Dim bytes(5000)as Byte 但它不是让我在结构中定义
我几乎完成了将模块从VB6转换为VB.NET,但是我遇到了以下2个引号的问题,我想知道是否有任何方法可以解决这个问题:

Structure AUDINPUTARRAY
    bytes(5000) As Byte
End Structure

我正在尝试将该字节行更改为:Dim bytes(5000)as Byte
但它不是让我在结构中定义大小.

这是第二个:

Private i As Integer,j As Integer,msg As String * 200,hWaveIn As integer

我不知道如何转换:msg As String * 200

解决方法

你不能在VB.Net中声明一个初始大小,你可以稍后使用构造函数中的Redim语句或者在需要的地方设置它的大小

Structure AUDINPUTARRAY
    Public bytes() As Byte
    Public Sub New(ByVal size As Integer)
        ReDim bytes(size) ' set size=5000

    End Sub


End Structure

在Visual Basic .NET中,除非在声明中使用VBFixedStringAttribute Class属性,否则不能将字符串声明为具有固定长度.上例中的代码会导致错误.

声明一个没有长度的字符串.当您的代码为字符串赋值时,值的长度决定了字符串的长度
见http://msdn.microsoft.com/en-us/library/f47b0zy4%28v=vs.71%29.aspx
.所以你的声明会变成

Private i As Integer,hWaveIn As Integer
    <VBFixedString(200)> Private msg As String

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读