Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题：表格列拆分
1楼
timber83 发表于：2025/1/8 10:21:00
我有一张表 
水果 颜色 产地 口感
苹果 红色|蓝色 山东|新疆|陕西 甜|脆|粉

如何自动如下一张，新表，规则 颜色列、产地列、口感列内多值分别拆分
水果 颜色 产地 口感
苹果 红色 山东 甜
苹果 红色 山东 脆
苹果 红色 山东 粉
苹果 红色 新疆 甜
苹果 红色 新疆 脆
苹果 红色 新疆 粉
苹果 红色 陕西 甜
苹果 红色 陕西 脆
苹果 红色 陕西 粉
苹果 蓝色 山东 甜
苹果 蓝色 山东 脆
苹果 蓝色 山东 粉
苹果 蓝色 新疆 甜
苹果 蓝色 新疆 脆
苹果 蓝色 新疆 粉
苹果 蓝色 陕西 甜
苹果 蓝色 陕西 脆
苹果 蓝色 陕西 粉
2楼
易简 发表于：2025/1/8 10:56:00
http://www.foxtable.com/webhelp/topics/0245.htm
[此贴子已经被作者于2025/1/8 10:59:57编辑过]
3楼
有点蓝 发表于：2025/1/8 11:09:00
For Each dr As DataRow In DataTables("表A").DataRows
For Each s1 As string In dr("颜色").split()
For Each s2 As string In dr("产地").split()
For Each s3 As string In dr("口感").split()
dim r as row = tables("新表").addnew
r("水果") = dr("水果")
r("颜色") = s1
r("产地") = s2
Next
Next
Next
Next
共3 条记录, 每页显示 10 条, 页签: [1]
Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02704 s, 2 queries.