【VB源码】VB把text1.text(变量)的内容写入并生成Excel的.xls