an example,
VB Code:
#include <windows.h>
BOOL APIENTRY DllMain (HINSTANCE hInst, DWORD reason, LPVOID reserved){
return TRUE;
}
extern "C" __declspec( dllexport ) __stdcall char *UChar(char *);
extern "C" __declspec( dllexport ) __stdcall char *UChar(char *UCaseString)
{
int StrUCaseLen;
StrUCaseLen=strlen(UCaseString);
char *myChar = new char[StrUCaseLen+1];
strncpy(myChar,UCaseString,StrUCaseLen);
return strupr(myChar) ;
}
VB Code:
Private Declare Function UChar Lib "c:\dll.dll" (ByVal strTxt As String) As String
Private Sub Command1_Click()
MsgBox UChar("huh¿")
End Sub