新建From1（窗体），新建Command1（按钮CommandButton），代码：

新建模块 modGetOpenFileName.bas，代码：