- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助][原创]如何实现Kg 转换为 吨 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=38304)
-- 发布时间：2013/7/25 13:15:00
-- [求助][原创]如何实现Kg 转换为 吨
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:kg 转换 为 t（吨）.table |
-- 发布时间：2013/7/25 13:53:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:kg 转换 ? t（吨）.table |
-- 发布时间：2013/7/25 13:58:00
--
谢谢您，但是循序计算~~
-- 发布时间：2013/7/25 14:11:00
--
以下是引用kingjdar在2013-7-25 13:58:00的发言：
什么意思?我看了LSY的例子没什么问题啊.已经循环遍历计算出结果了呀.
谢谢您，但是循序计算~~
-- 发布时间：2013/7/25 14:33:00
--
就是我导入数据后，转换吨后，
再次导入，在转换吨，之前的转换就会除1000了。。
-- 发布时间：2013/7/25 14:35:00
--
那你就加个后缀吧 83888KG 83333吨 然后判断最后一个字符是否为G再计算. 否则不计算 计算的时候除去后面的字符. 简单的字符串分割应该会处理吧?
-- 发布时间：2013/7/25 14:46:00
--
但统计计算了，不是很麻烦，而且是双精度值。
看来还是在excel处理好后在导入吧~
-- 发布时间：2013/7/25 14:55:00
--
可以这样：
Dim cnt As Integer = DataTables("xxx").DataRows.Count
\'合并数据的代码
For i As integer = cnt to DataTables("xxx").DataRows.Count - 1
Dim dr As DataRow = DataTables("xxx").DataRows(i)
dr("转换列") = dr("转换列") / 1000
Next
这样就不影响原来的数据了。
-- 发布时间：2013/7/25 16:43:00
--
谢谢狐爸 有点深奥，继续学习中~~