Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]修改字段


  共有1958人关注过本帖树形打印复制链接

主题：[求助]修改字段
帅哥哟，离线，有人找我吗？
江南小镇
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00 		[求助]修改字段  发帖心情 Post By：2024/1/31 11:31:00 [只看该作者]

老师，我想把M1,M2修改成一月，二月........谢谢老师


Tables("水电气使用数据查询_Table1").Fill("Select * Fr om {水电气统计}","能源消耗数据查询",True)
Tables("水电气使用数据查询_Table1").SetColVisibleWidth("编号|38|年|38|项目|34|项目ID|118|M1|49|M2|29|M3|63|M4|34|M5|41|M6|49|M7|49|M8|49|M9|41|M10|41|M11|41|M12|49|年度统计|70")
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110443 积分：562081 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/1/31 11:50:00 [只看该作者]

dim s1() as string = {"M1","M2",........}
dim s2() as string = {"一月","二月",........}
dim s as string = "编号|38|年|38|项目......."
for i as integer = 0 to s1.length - 1
s = s.replace(s1(i),s2(i))
next
msgbox(s)
 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2024/1/31 17:13:00 [只看该作者]

老师，哪里不对。


Tables("水电气使用数据查询_Table1").Fill("Select * Fr  om {水电气统计}","房屋出租能源消耗数据查询",True)
ID|118|M1|49|M2|29|M3|63|M4|34|M5|41|M6|49|M7|49|M8|49|M9|41|M10|41|M11|41|M12|49|年度统计|70")

Dim s1() As String = {"M1","M2","M2","M3","M4","M5","M6","M7","M8","M9","M10","M11","M12"}
Dim s2() As String = {"一月","二月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月"}
Dim s As String = "编号|38|年|38|项目|34|项目ID|118|一月|50|二月|50|三月|50|四月|50|五月|50|六月|50|七月|50|八月|50|九月|50|十月|50|十一月|50|十二月|50"
For i As Integer = 0 To s1.length - 1
s = s.replace(s1(i),s2(i))
Next
msgbox(s)
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110443 积分：562081 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/1/31 17:15:00 [只看该作者]

Dim s As String = "编号|38|年|38|项目|34|项目ID|118|M1|50|M2|5............

 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2024/1/31 17:38:00 [只看该作者]

老师，还是不行。

Dim s1() As String = {"M1","M2","M2","M3","M4","M5","M6","M7","M8","M9","M10","M11","M12"}
Dim s2() As String = {"一月","二月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月"}
Dim s As String = "编号|38|年|38|项目|34|项目ID|118|M1|50|M2|50|M3|50|M4|50|M5|50|M6|50|M7|50|M8|50|M9|50|M10|50|M11|50|M12|50"
For i As Integer = 0 To s1.length - 1
s = s.replace(s1(i),s2(i))
Next
msgbox(s)
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110443 积分：562081 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/2/1 8:29:00 [只看该作者]

什么地方不行？我测试没有问题

 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2024/2/1 10:16:00 [只看该作者]

老师好



图片点击可在新窗口打开查看此主题相关图片如下：屏幕截图 2024-02-01 101507.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2024/2/1 10:19:49编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110443 积分：562081 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/2/1 10:24:00 [只看该作者]

不就已经替换了吗，有啥问题？

 回到顶部
帅哥哟，离线，有人找我吗？
cd_tdh
 小大  9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐精 帖子：3202 积分：21279 威望：0 精华：0 注册：2016/3/28 16:57:00 		  发帖心情 Post By：2024/2/1 10:35:00 [只看该作者]

后面三个月“10、11、12月”不对

For i As Integer = 1 To s1.length - 1
[此贴子已经被作者于2024/2/1 10:37:47编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2024/2/1 10:37:00 [只看该作者]

找不出原因

 回到顶部
总数 14 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06250 秒, 4 次数据查询