如何在VB中调用这种类型的API函数？？？

通过函数GetDBServerDateTime在VB中取得SDate,Stimer的值??
-----------------------------------------------------------------
API_EXPORT int CALL_STYLE GetDBServerDateTime(char *SDate, char *Stimer);
/*
【功能说明】
为了避免操作员修改本地机器的时间而造成的程序判断的误差，特增加此函数以获取服务器的当前日期和时间。
【参数说明】
SDate：服务器当前的日期（返填值，固定8位，如20030101）；
Stimer：服务器当前的时间（返填值，最长8位，如12:11:10）。
【返回值】
0：成功
*/
// 通用方式增BKL记录