VC编写的DLL在VB调用的问题

Question

我用VC编写了一个DLL的库，里面代码如下，可在VB里面调用这个的时候执行结果总是1，不知道原因，请高手指点！
VC代码：
long WINAPI Rdcompany(long ICDEV,char *isTrue)
{
//上电
long st = turn_on(ICDEV);
if(st<0)  return st; //测卡类型
st = chk_card(ICDEV);
if(st<0)
{
turn_off(ICDEV);
return -137;
} if (isTrue="CD")
{
st = 2;
}
if (isTrue="ED")
{
st = 1;
}
return st;
}
VB代码：
Private Declare Function Rdcompany Lib "ic_genii.dll" (ByVal ICDEV As Long, isTrue As String) As Long
Private Sub Command3_Click()
    i = Rdcompany(ICDEV, "CD")
    Text2.Text = i
End Sub

Answer 1

以我的感觉,VC中的char*无法对应到VB的String.你改成WCHAR *看看