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

manongku.txt的代码：

调用这个子程序很方便。