VB和VB.NET里定义String的区别,谁帮我看看?(在线等)***********

[copico]

Public Declare Function FindExeAssoc Lib "Resctrl.dll" (ByVal pszFile As String, ByVal pszExeAssoc As String) As Long

Dim str1 As String * 512
Dim n As Long
n = FindExeAssoc(Filename, str1)

这是VB的,n的返回值是0,正常
可在.NET里一样用,只是Dim str1 As String这样定义,结果就返回不是0了,很奇怪

[dilong_hcj]

.NET string 是个类
Dim str1 As String 定义了一个类型指针还没有实例化
不知道FindExeAssoc是什么API，你对str1赋个初值试试看

[copico]

FindExeAssoc是别人写的一个dll,我调用的

[copico]

应该怎么样实例化?

[kjq_vb]

Public Declare Function FindExeAssoc Lib "Resctrl.dll" (ByVal pszFile As String, ByVal pszExeAssoc As String) As Integer

Dim str1 As String
Dim n As Integer
n = FindExeAssoc(Filename, str1)

[copico]

我知道什么原因了,它定义的函数非要实例化不可
所以string应该先实例化,给它分配空间
VB6里是:Dim str1 As String * 512
VB.NET里是:dim str1 as new string(" ",512)