TXT文本字段有不同数量的空格导入表格问题

暖阳春草

txt文件里面分成了各个字段，其中每个字段之间有空格，各个字段空格的数量不一样，我想将这个TXT文本导入到表格内，变成图2的样子并且修改表格后能按原来的格式保存成TXT，也就是说有些字段可能是空的，保存之后字段的空格能够跟原来的txt文件是一样的。目前这个软件用的是别人的，想自己写一个更好用的，应该如何写，希望各位大佬给点思路或者解决办法，附上txt文本。

moys520

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本	文本型		0
子文本	文本型		0
i	整数型
sy	整数型
j	整数型

文本 ＝ 分割文本 (到文本 (读入文件 (“ShopmallGoodsData.txt”)), 字符 (10), )
调试输出 (取数组成员数 (文本))
计次循环首 (取数组成员数 (文本), i)
子文本 ＝ 分割文本 (文本 [i], 字符 ( #Tab键 ), )
如果 (i ＝ 1)
计次循环首 (取数组成员数 (子文本), j)
sy ＝ 超级列表框1.插入列 (, , , , , )
超级列表框1.置列标题 (sy, 子文本 [j])
计次循环尾 ()
sy ＝ 超级列表框1.插入表项 (, , , , , )
计次循环首 (取数组成员数 (子文本), j)
超级列表框1.置标题 (sy, j － 1, 子文本 [j])
计次循环尾 ()

计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 spec<br /> .支持库 iext<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 子文本, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 sy, 整数型<br /> .局部变量 j, 整数型<br /> <br /> 文本 ＝ 分割文本 (到文本 (读入文件 (“ShopmallGoodsData.txt”)), 字符 (10), )<br /> 调试输出 (取数组成员数 (文本))<br /> .计次循环首 (取数组成员数 (文本), i)<br />     子文本 ＝ 分割文本 (文本 <i>, 字符 (#Tab键), )<br />     .如果 (i ＝ 1)<br />         .计次循环首 (取数组成员数 (子文本), j)<br />             sy ＝ 超级列表框1.插入列 (, , , , , )<br />             超级列表框1.置列标题 (sy, 子文本 [j])<br />         .计次循环尾 ()<br />     .否则<br />         sy ＝ 超级列表框1.插入表项 (, , , , , )<br />         .计次循环首 (取数组成员数 (子文本), j)<br />             超级列表框1.置标题 (sy, j － 1, 子文本 [j])<br />         .计次循环尾 ()<br />     .如果结束<br /> <br /> .计次循环尾 ()

上一条回复犯病了抱歉，然后还是注意文本编码ansi

暖阳春草

此处附上txt文件
ShopmallGoodsData.txt (16.04 KB, 下载次数: 7)

2023-1-12 05:46 上传

点击文件名下载附件

wang2lang

你这个txt本身就是制表符分隔的啊，直接用excel打开这个txt，编辑修改后再另存为txt格式就可以了啊。

moys520

很简单的一个问题，我只给你写了前四个，其他的你自己加就行了
PS：注意，一定要给文本编码转ansi，你现在是utf8,

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本	文本型		0
子文本	文本型		0
i	整数型
sy	整数型
j	整数型

文本 ＝ 分割文本 (到文本 (读入文件 (“ShopmallGoodsData.txt”)), 字符 (10), )
调试输出 (取数组成员数 (文本))
计次循环首 (取数组成员数 (文本), i)
子文本 ＝ 分割文本 (文本 [i], 字符 ( #Tab键 ), )
sy ＝ 超级列表框1.插入表项 (, , , , , )
计次循环首 (4, j)
超级列表框1.置标题 (sy, j － 1, 子文本 [j])
计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 spec<br /> .支持库 iext<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 子文本, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 sy, 整数型<br /> .局部变量 j, 整数型<br /> <br /> 文本 ＝ 分割文本 (到文本 (读入文件 (“ShopmallGoodsData.txt”)), 字符 (10), )<br /> 调试输出 (取数组成员数 (文本))<br /> .计次循环首 (取数组成员数 (文本), i)<br />     子文本 ＝ 分割文本 (文本 <i>, 字符 (#Tab键), )<br />     sy ＝ 超级列表框1.插入表项 (, , , , , )<br />     .计次循环首 (4, j)<br />         超级列表框1.置标题 (sy, j － 1, 子文本 [j])<br />     .计次循环尾 ()<br /> .计次循环尾 ()

看到你文本的创世结晶，我还以为是genshin.....


补充内容 (2023-1-12 08:51):
这条帖子脑抽了，看下一条

陽陽陽

直接子文本替换（原文本，“  ”，“ ”）俩空格换一个空格，直到没的换了
一个判断循环首

真冬

  

子程序1导入到高级表格 (“E:\Downloads\ShopmallGoodsData.txt”, 高级表格1, 真)

子程序名	返回值类型	公开	备 注
子程序1导入到高级表格
参数名	类 型	参考	可空	数组	备 注
参数_文件路径	文本型
参数_高级表格	高级表格
参数_UTF8	逻辑型

变量名	类 型	静态	数组	备 注
a	字节集
b	整数型
c	文本型

参数_高级表格.表头行数 ＝ 0
参数_高级表格.表头列数 ＝ 0
参数_高级表格.置光标 (0, 0)
a ＝ 读入文件 (参数_文件路径)
如果真 (参数_UTF8)
a ＝ 编码转换 (a, #编码_UTF_8, #编码_GB18030, )
参数_高级表格.行数 ＝ 取字节集长度 (a) － 取字节集长度 (子字节集替换 (a, { 10 }, {  }, , ))
b ＝ 寻找字节集 (a, { 10 }, )
参数_高级表格.列数 ＝ b － 取字节集长度 (子字节集替换 (取字节集左边 (a, b), { 9 }, {  }, , )) ＋ 1
c ＝ 取剪辑板文本 ()
置剪辑板文本 (到文本 (a))
参数_高级表格.粘贴 ()
置剪辑板文本 (c)
参数_高级表格.表头行数 ＝ 1

i支持库列表	支持库注释
eGrid	高级表格支持库
iconv	编码转换支持库

.版本 2<br /> .支持库 eGrid<br /> .支持库 iconv<br /> <br /> 子程序1导入到高级表格 (“E:\Downloads\ShopmallGoodsData.txt”, 高级表格1, 真)<br /> <br /> .子程序 子程序1导入到高级表格<br /> .参数 参数_文件路径, 文本型<br /> .参数 参数_高级表格, 高级表格<br /> .参数 参数_UTF8, 逻辑型, 可空<br /> .局部变量 a, 字节集<br /> .局部变量 b, 整数型<br /> .局部变量 c, 文本型<br /> <br /> 参数_高级表格.表头行数 ＝ 0<br /> 参数_高级表格.表头列数 ＝ 0<br /> 参数_高级表格.置光标 (0, 0)<br /> a ＝ 读入文件 (参数_文件路径)<br /> .如果真 (参数_UTF8)<br />     a ＝ 编码转换 (a, #编码_UTF_8, #编码_GB18030, )<br /> .如果真结束<br /> 参数_高级表格.行数 ＝ 取字节集长度 (a) － 取字节集长度 (子字节集替换 (a, { 10 }, {  }, , ))<br /> b ＝ 寻找字节集 (a, { 10 }, )<br /> 参数_高级表格.列数 ＝ b － 取字节集长度 (子字节集替换 (取字节集左边 (a, b), { 9 }, {  }, , )) ＋ 1<br /> c ＝ 取剪辑板文本 ()<br /> 置剪辑板文本 (到文本 (a))<br /> 参数_高级表格.粘贴 ()<br /> 置剪辑板文本 (c)<br /> 参数_高级表格.表头行数 ＝ 1

暖阳春草

moys520 发表于 2023-1-12 08:52
[e=0].版本 2
.支持库 spec
.支持库 iext

保存到txt的话，也就是有多少个空数据就写多少次tab是吧

moys520

暖阳春草 发表于 2023-1-12 13:32
保存到txt的话，也就是有多少个空数据就写多少次tab是吧

嗯嗯，是的，我这个按理来说可以直接用

菜鸟路过

你要搞清楚那些是空格，那些是制表符。表格数据一般都是用制表符来分割的，空格只是空数据的填充罢了