24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1370  |  回复: 4

yhwsmile

金虫 (小有名气)

[交流] 【求助】请教VB txt文件输出如何让每个数据占用固定长度的字节~~~ 已有3人参与

vb输出txt数据文件,我想像fortran那样输出的txt文件每个数据占6个字节,请问该如何实现啊?
我的方法:用cstr将integer转换为string型,然后将string型的长度设为6,但输出后空格是补在数据后面的,我们数据格式要求是空格在前面~~~
图1为我直接生成的数据~~~
图2为我想得到的形式~~~
图3为我转成string,将长度设为8后得到的形式~~
~~


谢谢各位大虾了~~~~~
图1

图2

图3


[ Last edited by yhwsmile on 2010-9-25 at 17:22 ]
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yhwsmile

金虫 (小有名气)

余泽成:欢迎常来程序语言版! 2010-09-25 23:06:57
自己解决了~~~
c0(k) = Trim(CStr(b0(k)))
    If Len(c0(k)) = 1 Then c0(k) = "     " + c0(k)
    If Len(c0(k)) = 2 Then c0(k) = "    " + c0(k)
    If Len(c0(k)) = 3 Then c0(k) = "   " + c0(k)
    If Len(c0(k)) = 4 Then c0(k) = "  " + c0(k)
    If Len(c0(k)) = 5 Then c0(k) = " " + c0(k)
不知道有没有更好的方法~~~
2楼2010-09-25 17:23:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

magic7004

金虫 (职业作家)


小木虫(金币+0.5):给个红包,谢谢回帖交流
那5个if可以改成c0(k) = Space(6-Len(c0(k)) & c0(k)
流氓不可怕,可怕的是流氓有文化,有文化又BH的流氓无敌~~!
3楼2010-09-26 09:34:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yhwsmile

金虫 (小有名气)

引用回帖:
Originally posted by magic7004 at 2010-09-26 09:34:22:
那5个if可以改成c0(k) = Space(6-Len(c0(k)) & c0(k)

恩,谢谢咯~~~
偶还得努力咯
4楼2010-09-26 14:36:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

不想注册啊

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
请教如何将采集到的数据保存到txt文件中?我用NI的卡
5楼2012-12-24 11:08:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 yhwsmile 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料求调剂 +10 一样YWY 2026-04-05 10/500 2026-04-05 22:16 by dongzh2009
[考研] 315求调剂 +13 欣喜777 2026-04-04 14/700 2026-04-05 18:48 by liuying2007
[考研] +5 化工专硕323分 2026-04-04 5/250 2026-04-05 08:02 by 544594351
[考研] 11408,335分,本科211,求调剂,可转专业 +5 鳄梨大鳄鱼 2026-04-03 5/250 2026-04-04 22:49 by chongya
[考研] 材料专硕306英一数二 +8 z1z2z3879 2026-03-31 8/400 2026-04-04 22:08 by hemengdong
[考研] 282电子信息0854专硕调剂 +4 202451007219 2026-04-02 6/300 2026-04-04 21:55 by laoshidan
[考研] 一志愿哈尔滨工业大学085600英一数二337分求调剂 +11 lyz0427 2026-04-03 11/550 2026-04-04 15:31 by dongzh2009
[考研] 0703求调剂 +6 zizimo 2026-03-31 6/300 2026-04-04 14:16 by 无际的草原
[考研] 一志愿085404,总分291,四级已过,求调剂 +5 阿俊阿俊阿俊 2026-04-04 7/350 2026-04-04 13:23 by 莲菜就是藕吧
[考研] 考研调剂 +3 Draa 2026-04-03 3/150 2026-04-03 17:37 by hgwz7468
[考研] 一志愿北京交通大学材料工程总分358 +4 cs0106 2026-04-03 4/200 2026-04-03 13:41 by 百灵童888
[考研] 274求调剂 +10 薛定谔的虎。 2026-04-01 10/500 2026-04-03 10:13 by tianyyysss
[考研] 调剂 +7 祉岷. 2026-04-02 7/350 2026-04-03 09:11 by 花呗还欠600
[考研] 085600,320分求调剂 +6 大馋小子 2026-04-02 6/300 2026-04-02 21:54 by dongzh2009
[考研] 一志愿山东大学,085600,344 +7 魏子per 2026-04-02 8/400 2026-04-02 21:12 by 百灵童888
[考研] 085602化工求调剂(331分) +9 111@127 2026-03-30 9/450 2026-04-02 20:00 by dick_runner
[考研] 08开头看过来!!! +4 wwwwffffff 2026-03-31 6/300 2026-04-02 11:42 by 均值回归
[考研] 0817化工学硕调剂 +11 努力上岸中! 2026-03-31 11/550 2026-04-01 20:30 by 赖春艳
[考研] 085600 一志愿9 总分351 求调剂学校 +7 czhcz 2026-03-31 9/450 2026-04-01 19:24 by 无际的草原
[考研] 一志愿中海洋材料357 +4 麦恩莉. 2026-03-30 4/200 2026-03-31 14:35 by 记事本2026
信息提示
请填处理意见