设置方法如下：打开电脑，点击“工程”，选择“部件”；显示“部件”对话框后，将“Microsoft Common Dialog control
6.0”选中；添加工具栏中的CommonDialog控件图标，将其添加到窗体上；编辑"浏览目录"和"保存默认路径"。
点击"选择保存目录"，选中 "全部文件"写入默认保存路径中；开始程序运行，默认保存路径即可设置完成。
⒈RND函数会生成一个0至1之间的随机数，根据自己要的范围去加上系数；⒉用一个字符串变量拼接产生的数字；⒊判断字符串，如果不为空则需要加上换行符；⒋如果是第一次赋值，则不需要换行；⒌最后把字符串赋值给文本框Text属性显示，就完成换行了。