ShellExecute运行时错误 使用Null无效

VB code

HBackGround = ShellExecute(Null, "open", BGpath, Null, Null, SW_SHOWNORMAL)

我想用它启动我的一个程序,路径确认了的,但是出现这个错误

[解决办法]
ShellExecute 0, "OPEN", sFile, "", "", 1