用VB编写.DLL动态链接库文件