下面的VB6.0编写的代码怎么转为VB.net

Dim file1 As FileStream

创新互联专业为企业提供贡井网站建设、贡井做网站、贡井网站设计、贡井网站制作等企业网站建设、网页设计与制作、贡井企业网站模板建站服务，10余年贡井做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

filename = "c:\temp\MyTest.txt"

Dim GetData(4) As Byte, s(4) As Char

file1 = System.IO.File.OpenRead(filename)

Dim CMGs As Long

Dim DPBo As Long

Dim i As Integer = 0, j As Integer

While file1.Read(GetData, 0, 5)  0

i = i + 1

For j = 0 To 4

s(j) = ChrW(GetData(j))

Next

If s = "CMG=""" Then CMGs = i

If s = "[Host" Then DPBo = i - 2 : Exit While

End While

主要是vb.net取消了定长字符串, 所以用字节数组读入, 还得转成字符数组来比较.

请问以下VB项目有办法转换成VB.net项目吗？

样是不行的，要转化成VB.net只有重新改编，因为框架不同语法也有太多的不同

如何vb转换到vb.net

你可以直接打开 VB6 的程序，VB.net 会自动启动升级向导将你的 VB6 代码升级为 VB.net。

能不能将vb的代码转换为VB.NET的代码，困难

可以发过来看看

Dim str As String = "", temp, n As Integer

Dim str1 As String = "12,45,2,9,41,31,66,83,2,1,-9,-91,-21"

Dim a() As String = Split(str1, ",")

For i = 1 To UBound(a) Step 1

a(i) = Val(a(i))

Next

temp = 0

n = 0

For i = 1 To UBound(a)

If a(i)  temp Then

temp = a(i)

End If

If a(i)  0 Then

n = n + 1

End If

Next

str = str  "正数的个数为 "  n

str = str  "最大元素的下标为 "

For i = 1 To UBound(a)

If a(i) = temp Then

str = str  i  " "

End If

Next

TextBox6.Text = str

vb6文件可以转成vb.net的吗？怎么转

能不能转换 主要取决于vb6的源程序是不是使用了第三方控件 如果用了 那这些全部都不能转！~

如果vb6里面有控件数组vb.net会自动生成出一套东西（vb.net里面已经没有控件数组）模拟控件数组

如果vb6的程序很简单的话，转成.net之后应该改的地方不大！~

绝对你应该先弄清楚以前vb6的程序具体用了什么 然后去微软查一下vb6升级到vb.net最大的区别！~

我们做过好几个升级的程序 有的不用改 有的简单修改 有的基本重写！~

分享名称：vb程序转换vb.net vb进制转换器
标题路径：http://pwwzsj.com/article/hheijh.html