VB 动态库,该怎么解决

VB 动态库
有一个VC动态库 导出两函数（C中头文件中的声明）
DWORD WINAPI ETConnectServer(char*hostip);
VOID WINAPI ETDisConnectServer();
以下是C中的调用：
int ret;
ret = ETConnectServer("192.168.33.44");

请问路过大侠，小弟如何在VB中声明并调用以上的函数，谢谢 ！

[解决办法]

VB code

Private Declare Function ETConnectServer Lib "XXX.dll" (byval hostip As string) As LongPrivate Declare Sub ETDisConnectServer Lib "XXX.dll" ( )