求助?如何将数据库每个字段以固定长度写入文本文件中？

Question

求助?如何将数据库每个字段以固定长度写入文本文件中？现在是以逗号分隔写入文本文件中的，但是不美观。想每个字段以固定长度写入就可以了。
1,123,0001,00123456,1,83199201,2005-12-31 9:43:19,
2, , , ,1,13306402666,2005-12-31 14:45:33,
3,35786,5,00123456,1,83194578,2005-12-31 16:02:29,
4,12345678,12345678,678,1,82635446,2006-1-7 9:34:58,
5,123,0001,00123456,1,82635421,2006-1-7 9:35:59,

Answer 1

dim str as string *10 '占10位 这样写入的时候多做几个临时变量 然后拼字符串写入就行了

Answer 2

字段值之间用TAB（制表符）分隔即可
根据字段的长度加入适当数量的制表符。Dim strTmp As StringstrTmp = rs!Field1 & String(3, vbTab) & rs!Field2 & String(3, vbTab) & rs!Field3＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
免费的学习、交流、源码、工具下载网站，欢迎大家访问！
http://www.j2soft.cn/

Answer 3

用TAB也不太方便，因为字段的内容长度不知道，会造成TAB位的。直接定位的比较好。
取字段的大小来定位置，因为内容不可能大于字段本身定义的长度。

Answer 4

例：如果最大字段为10位，那么就把所有的字段显示为
1        ,123       ,0001      ,00123456   ,2005-12-31 9:43:19,
2222     ,23232     ,ds        ,erere      ,wwew              ,把需要处理的字段strData 放到：
IIf(Len(strData)) < 10, strData & Space(10 - Len(strData))
处理一下就ok了