24小时热门版块排行榜    

查看: 1363  |  回复: 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 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 286分人工智能专业请求调剂愿意跨考! +4 lemonzzn 2026-03-17 8/400 2026-03-21 22:49 by lemonzzn
[考研] 初试 317 +7 半拉月丙 2026-03-20 7/350 2026-03-21 22:26 by peike
[考研] 0703化学调剂 +4 妮妮ninicgb 2026-03-21 4/200 2026-03-21 18:39 by 学员8dgXkO
[考研] 277材料科学与工程080500求调剂 +6 自由煎饼果子 2026-03-16 6/300 2026-03-21 17:21 by 学员8dgXkO
[考研] 生物学一志愿985,分数349求调剂 +3 zxts12 2026-03-21 3/150 2026-03-21 16:34 by 33来了真来了
[考研] 材料与化工(0856)304求 B区 调剂 +3 邱gl 2026-03-21 3/150 2026-03-21 13:47 by lature00
[考研] 279分求调剂 一志愿211 +14 chaojifeixia 2026-03-19 15/750 2026-03-21 13:24 by zhukairuo
[考研] 085601调剂 358分 +3 zzzzggh 2026-03-20 4/200 2026-03-21 10:21 by luoyongfeng
[考研] 化学求调剂 +4 临泽境llllll 2026-03-17 5/250 2026-03-21 02:23 by JourneyLucky
[考研] 一志愿华中科技大学,080502,354分求调剂 +5 守候夕阳CF 2026-03-18 5/250 2026-03-21 01:06 by JourneyLucky
[考研] 274求调剂 +10 S.H1 2026-03-18 10/500 2026-03-20 23:51 by JourneyLucky
[考研] 317求调剂 +5 申子申申 2026-03-19 9/450 2026-03-20 22:26 by JourneyLucky
[考研] 329求调剂 +9 想上学吖吖 2026-03-19 9/450 2026-03-20 22:01 by luoyongfeng
[考研] 工科材料085601 279求调剂 +7 困于星晨 2026-03-17 9/450 2026-03-20 17:38 by 无懈可击111
[考研] 广西大学家禽遗传育种课题组2026年硕士招生(接收计算机专业调剂) +3 123阿标 2026-03-17 3/150 2026-03-20 15:58 by 飞行琦
[考研] 材料与化工求调剂 +7 为学666 2026-03-16 7/350 2026-03-19 14:48 by 尽舜尧1
[考研] 一志愿985,本科211,0817化学工程与技术319求调剂 +10 Liwangman 2026-03-15 10/500 2026-03-19 10:25 by 无际的草原
[考研] 344求调剂 +6 knight344 2026-03-16 7/350 2026-03-18 20:13 by walc
[考研] 一志愿211 0703方向310分求调剂 +3 努力奋斗112 2026-03-15 3/150 2026-03-16 16:44 by houyaoxu
[考研] 0856专硕279求调剂 +5 加油加油!? 2026-03-15 5/250 2026-03-15 11:58 by 2020015
信息提示
请填处理意见