如何获取FreeBasic动态链接库中的当前文件名？

Question

如何让FreeBASIC动态链接库找到自己的文件名和路径？到目前为止我已经尝试过了：(用rundll32文件名，DllMain)代码：

#include "windows.bi"
Extern "Windows-MS"
Sub DllMain() Export
    dim This as String
    This = dir(command$(0))
    MessageBox( null, "Hello World", This, MB_OK )
End Sub
End Extern

。。。但它不起作用。

但是，当我将它编译为EXE时，它工作得很好。

有什么建议吗？谢谢!