如何把提取到的文本数据变量输出到EXCEL文档里

luliang2580

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

子程序名	返回值类型	公开	备 注
处理

变量名	类 型	静态	数组	备 注
文本	文本型
行数	整数型
计次	整数型
变量	文本型
文本分割	文本型		0
数字组	整数型		0
变量组	文本型		0
z_计次	整数型
空点	整数型
变量文本	文本型		0
独立	文本型
独立点	文本型
i	整数型
当前最大	文本型
z	整数型
个数	整数型
x	整数型
节点	节点
结果	文本型
Str	文本型

文本 ＝ 到文本 (读入文件 (编辑框1.内容))
文本_取中间_批量 (文本, “*”, #换行符 ＋ “*”, 变量文本, , , , , , , )
加入成员 (变量文本, 文本_倒取出中间文本 (文本, #换行符 ＋ “End”, “*”, , ))
行数 ＝ 取数组成员数 (变量文本)
重定义数组 (数字组, 假, 0)
重定义数组 (变量组, 假, 0)
计次循环首 (行数, 计次)
变量 ＝ 变量文本 [计次]
文本分割 ＝ 分割文本 (变量, “ ”, )
加入成员 (数字组, 取数组成员数 (文本分割) － 1)
如果真 (取数组成员数 (文本分割) ＝ 2)
独立 ＝ 文本分割 [2]
独立点 ＝ 独立点 ＋ “ ” ＋ 独立
计次循环首 (取数组成员数 (文本分割) － 1, z_计次)
加入成员 (变量组, 文本分割 [z_计次 ＋ 1])
计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (变量组), i)
如果真 (i ＝ 1)
当前最大 ＝ 变量组 [i]
如果真 (i ＞ 1)
如果 (到整数 (变量组 [i]) ＞ 到整数 (当前最大))
当前最大 ＝ 变量组 [i]




计次循环尾 ()
调试输出 (数字组)
计次循环首 (取数组成员数 (数字组), z)
个数 ＝ 0
计次循环首 (取数组成员数 (数字组), x)
如果真 (数字组 [z] ＝ 数字组 [x])
个数 ＝ 个数 ＋ 1

计次循环尾 ()
如果真 (节点.加入属性 (到文本 (数字组 [z]), 0))
结果 ＝ 到文本 (数字组 [z]) ＋ “    =” ＋ 到文本 (个数)
Str ＝ Str ＋ 结果 ＋ #换行符

计次循环尾 ()
调试输出 (独立点, 取数组成员数 (变量组), 当前最大, Str)
' 写到文件 (“\1.xlsx”, 到字节集 (独立点))

子程序名	返回值类型	公开	备 注
_按钮1_被单击

通用对话框1.初始目录 ＝ 取运行目录 ()
通用对话框1.打开 ()
编辑框1.内容 ＝ 通用对话框1.文件名

子程序名	返回值类型	公开	备 注
_按钮2_被单击

处理 ()

i支持库列表	支持库注释
EDataStructure	数据结构支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EDataStructure<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 处理<br /> .局部变量 文本, 文本型<br /> .局部变量 行数, 整数型<br /> .局部变量 计次, 整数型<br /> .局部变量 变量, 文本型<br /> .局部变量 文本分割, 文本型, , "0"<br /> .局部变量 数字组, 整数型, , "0"<br /> .局部变量 变量组, 文本型, , "0"<br /> .局部变量 z_计次, 整数型<br /> .局部变量 空点, 整数型<br /> .局部变量 变量文本, 文本型, , "0"<br /> .局部变量 独立, 文本型<br /> .局部变量 独立点, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 当前最大, 文本型<br /> .局部变量 z, 整数型<br /> .局部变量 个数, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 节点, 节点<br /> .局部变量 结果, 文本型<br /> .局部变量 Str, 文本型<br /> <br /> 文本 ＝ 到文本 (读入文件 (编辑框1.内容))<br /> 文本_取中间_批量 (文本, “*”, #换行符 ＋ “*”, 变量文本, , , , , , , )<br /> <br /> <br /> 加入成员 (变量文本, 文本_倒取出中间文本 (文本, #换行符 ＋ “End”, “*”, , ))<br /> 行数 ＝ 取数组成员数 (变量文本)<br /> <br /> <br /> 重定义数组 (数字组, 假, 0)<br /> 重定义数组 (变量组, 假, 0)<br /> <br /> .计次循环首 (行数, 计次)<br />     变量 ＝ 变量文本 [计次]<br /> <br />     文本分割 ＝ 分割文本 (变量, “ ”, )<br /> <br /> <br />     加入成员 (数字组, 取数组成员数 (文本分割) － 1)<br /> <br /> <br />     .如果真 (取数组成员数 (文本分割) ＝ 2)<br />         独立 ＝ 文本分割 [2]<br />         独立点 ＝ 独立点 ＋ “ ” ＋ 独立<br /> <br />     .如果真结束<br />     .计次循环首 (取数组成员数 (文本分割) － 1, z_计次)<br />         加入成员 (变量组, 文本分割 [z_计次 ＋ 1])<br /> <br />     .计次循环尾 ()<br /> <br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (变量组), i)<br />     .如果真 (i ＝ 1)<br />         当前最大 ＝ 变量组 <i><br />     .如果真结束<br />     .如果真 (i ＞ 1)<br />         .如果 (到整数 (变量组 <i>) ＞ 到整数 (当前最大))<br />             当前最大 ＝ 变量组 <i><br />         .否则<br /> <br />         .如果结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> 调试输出 (数字组)<br /> .计次循环首 (取数组成员数 (数字组), z)<br />     个数 ＝ 0<br /> <br /> <br />     .计次循环首 (取数组成员数 (数字组), x)<br />         .如果真 (数字组 [z] ＝ 数字组 [x])<br />             个数 ＝ 个数 ＋ 1<br /> <br /> <br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br /> <br />     .如果真 (节点.加入属性 (到文本 (数字组 [z]), 0))<br />         结果 ＝ 到文本 (数字组 [z]) ＋ “    =” ＋ 到文本 (个数)<br />         Str ＝ Str ＋ 结果 ＋ #换行符<br />     .如果真结束<br /> <br /> <br /> .计次循环尾 ()<br /> <br /> 调试输出 (独立点, 取数组成员数 (变量组), 当前最大, Str)<br /> <br /> ' 写到文件 (“\1.xlsx”, 到字节集 (独立点))<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 通用对话框1.初始目录 ＝ 取运行目录 ()<br /> 通用对话框1.打开 ()<br /> 编辑框1.内容 ＝ 通用对话框1.文件名<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 处理 ()

我是新手

首先把Excel文件放到资源表里。运行后可以用写到文件。这个命令写出excel文件。
然后用这个模块操作excel表格比较简单
http://www.eyy8.vip/thread-1316-1-1.html

luliang2580

我是新手 发表于 2020-10-5 17:59
首先把Excel文件放到资源表里。运行后可以用写到文件。这个命令写出excel文件。
然后用这个模块操作excel表 ...

大神教我用下，这个模块用不了呀！qq:446327791

我是新手

luliang2580 发表于 2020-10-6 13:15
大神教我用下，这个模块用不了呀！qq:446327791

可以用的啊。你看看里面有用法例子。这个也行
http://www.eyy8.vip/thread-1327-1-1.html

luliang2580

我是新手 发表于 2020-10-7 09:58
可以用的啊。你看看里面有用法例子。这个也行
http://www.eyy8.vip/thread-1327-1-1.html ...

方便QQ联系下吗？

yyz860723

楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！