易截截图软件、单文件、免安装、纯绿色、仅160KB

vb 文件处理问题,急急急! - VB / 基础类

原文件内容如下(文件很大,约有15万行):
'日期+正点 数据
2001110100 25325.0
2001110101 25635.0
2001110102 26035.0
2001110103 26345.0
2001110104 26700.0
2001110105 99999
2001110106 99999
2001110107 99999
2001110108 27170.0
2001110109 27070.0
2001110110 26850.0
2001110111 26580.0
2001110112 26320.0
2001110113 26045.0
……
……
……
1.有时第一列前面会有一个空格
如:
(空格)2001110100 25325.0
(空格)2001110101 25635.0
  …… ……
  …… ……
  …… ……
2.不管原文件第一列前是否有空格,都要将第二列的每个数据乘以固定值(如0.32),如果第二列的数据为“99999”则不需要计算保持原有的“99999”。然后将结果输出为另一个文件(第一列前不带空格)。
格式如下:(保留一位小数)
2001110100 8104.0
2001110101 8203.2
……
2001110106 99999
2001110107 99999
……
……

多谢!!!
split函数拆分。
trim去掉空格。

引用
split函数拆分。
trim去掉空格。

拆分谁都知道 问题是怎么确定是后面的那个数?


这个问题,大家不是再在上一帖里有回答吗,难道还未解决
http://topic.csdn.net/u/20100519/23/067aff69-aab2-43ef-b3db-872e5a49fe7e.html

感谢上帝,感谢楼主散分,俺再复制一下:
Dim i As Long
Dim strText As String
Dim strLines() As String
Dim strFields() As String

'读文件
Open App.Path


相关问答:

vb - VB / 基础类

数据库里有一个字段的内容是二进制,怎么才能把这个二进制读出来
使用字节流对象可以实现

例如现在数据库里有个字段的内容是0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......

vb生成EXE - VB / 基础类

form1中有text1-8, 和command1 
text8中为程序代码(生成窗体为form2(已做好))
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题 ......

求助:C代码change toVB代码 - VB / 基础类

挺繁琐,之前发的帖子,分值太低现在重发一个。欢迎各位大侠~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......

vb中unicode码,如何转换成文本 - VB / 基础类

用VB编程读取短信,得到一大堆unicode编码,请教如何转换成文本
例如:读取短信后(华为900C或TC35i),串口得到如下数据:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......

VB调用EXCEL绘图,如何修改X轴坐标 - VB / 基础类

小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
  objExlApp.Charts.Add
  objExlApp.ActiveChart.ChartType = xlLine
  objExlApp.ActiveChart.HasLegend = True
  objExlApp. ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号