我的问题，比较棘手

[maxsuy]

我用VC，做一个DLL，
在VB里调用为什么总是提示，操作非法？
extern "C" _declspec(dllexport) char * GetLocalIp(void)
{
WORD wVersionRequested;
WSADATA wsaData;
char name[255];
char ipad[100];
CString ip;
PHOSTENT hostinfo;
wVersionRequested = MAKEWORD( 2, 0 );

if ( WSAStartup( wVersionRequested, &wsaData ) == 0 )
{

if( gethostname ( name, sizeof(name)) == 0)
{
if((hostinfo = gethostbyname(name)) != NULL)
{
ip = inet_ntoa (*(struct in_addr *)*hostinfo->h_addr_list);
strcpy(ipad, LPCSTR(ip));
return ipad;

}
}

WSACleanup( );
}
return "";
}

这是DLL的内容。

VB内容如下：
Declare Function GetLocalIp Lib "test.DLL" () As String
On Error Resume Next
Dim s As String
s = GetLocalIp
MsgBox Err.Description

[zzh]

VB中是采用COM接口的，支持双字节，而你使用CHAR＊是单字节的，在VB中你应该这样定义
Declare Function GetLocalIp Lib "test.DLL" () As String
On Error Resume Next
Dim s As String *1023 // 分配内存，不能直接定义一个字符串变量。
s = GetLocalIp
MsgBox Err.Description

[maxsuy]

照这样方法修改后仍然非法操作？
另有dim s as string *123
与定义dim s(1 to 123) as byte有区别吗

[zyme007]

DLL这样定义：
extern "C" _declspec(dllexport) _stdcall char * GetLocalIp(void)

[mahongxi]

同意楼上，特别注意 __stdcall!