能不能转换 主要取决于vb6的源程序是不是使用了第三方控件 如果用了 那这些全部都不能转！~
成都创新互联公司主营企业营销型网站建设，为众多企业提供了品牌网站设计服务，建网站哪家好？拥有多年的全网营销推广流程，能够为企业定制化制作网站服务，在公司网站建设维护方面成绩突出。
如果vb6里面有控件数组vb.net会自动生成出一套东西（vb.net里面已经没有控件数组）模拟控件数组
如果vb6的程序很简单的话，转成.net之后应该改的地方不大！~
绝对你应该先弄清楚以前vb6的程序具体用了什么 然后去微软查一下vb6升级到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
Dim file1 As FileStream
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取消了定长字符串, 所以用字节数组读入, 还得转成字符数组来比较.
你可以直接打开 VB6 的程序，VB.net 会自动启动升级向导将你的 VB6 代码升级为 VB.net。
使用.net的升级向导,虽然不能完全升级但大部分代码都升级了,再做略微修改