显示程序位置(VB6.0源代码)ChDirApp.Path&"\显示程序位置