永发信息网

vb导出txt文本如何能整列整齐的输出?

答案:2  悬赏:60  手机版
解决时间 2021-02-15 06:58
  • 提问者网友:低吟詩仙的傷
  • 2021-02-14 07:26
如图,我用了两个 vbtab,出来后并不是整齐的。
s=str1 & vbtab & vbtab & str2
请问:1、如何能使整列 是整齐的输出呀。
2、两个vbtab类似print tab(2)的写法应该是怎么样的?我写vbtab(2),提示缺少数组,如果我想写10个tab,总不能都用& vbtab & vbtab....这样连接起来吧?
谢谢

3、我用str1 & space(20-len(str1)) & str2 & space(20-len(str2)) 也不行,因为str1是汉字相当于两个数字的位置,str2是数字,所以这样也对不齐。



最佳答案
  • 五星知识达人网友:玩世
  • 2021-02-14 08:53
方案一、
print tab(5);str1;tab(20);str2
方案二、
s=str1 & string(20-len(str1)*2)," ") & str2

说明:在计算str1与str2之间的空格时,不考虑str2,只考虑str1的长度,因为是汉字所以len(str1)*2表示了占用宽度。你试试复制我的代码,或者仔细抄写我的代码看结果。

当然还有方案三,就比较麻烦了
print str1;
me.CurrentX =2000
print str2
也可以实现对齐

请验证无误后采用。谢谢
全部回答
  • 1楼网友:青尢
  • 2021-02-14 09:57
private sub command6_click() open "d:\a.txt" for output as #4 for i = 0 to 9900000    if res(i, 1) <> "" then       print #4, res(i, 1) & " " & res(i, 2) & " " & res(i, 3)    else     exit for    end if next i close #4 msgbox ("ºï²¢îä¼þíê±ï£¡")
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯