新建From1（窗体），新建Text1（TextBox）Image1(Image)，Picture1（PictureBox），Command1（按钮CommandButton，Caption=保存为文件）代码：

新建模块 modQRCodegen.bas，代码：