vb将数据写入txt文件 VB读取excel数据写入txt中？
VB读取excel数据写入txt中？Dim db As Database Dim rs As Recordset Dim fn As integer Set db=OpenDatabase（“c:我的
VB读取excel数据写入txt中？
Dim db As Database Dim rs As Recordset Dim fn As integer Set db=OpenDatabase（“c:我的邮箱.xls“，False，False，”excel 8.0HDR=YES“）设置rs=db.OpenRecordset文件(数据库表定义（0）.名称）先搬家fn=自由文件打开“我的文本.txt“对于append as fn i=1 do while（非(卢比eof))打印&放大器vbCrlfrs.movenext公司回路闭合fnrs.关闭数据库关闭