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

新建Module1（模块 Module1.bas），代码：