以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]提取列的日期跟用户名 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23419) |
|
-- 作者:nblwar -- 发布时间:2012/9/11 20:30:00 -- [求助]提取列的日期跟用户名
[此贴子已经被作者于2012-9-12 22:36:58编辑过]
|
|
-- 作者:czy -- 发布时间:2012/9/11 20:32:00 --
http://www.foxtable.com/help/topics/0245.htm
|
|
-- 作者:nblwar -- 发布时间:2012/9/11 21:02:00 -- Dim drs As List(Of DataRow) = DataTables("生产").Select("[当前规格] = \'7.0\'") 这个代码有什么问题吗 [此贴子已经被作者于2012-9-11 21:04:47编辑过]
|
|
-- 作者:czy -- 发布时间:2012/9/11 21:04:00 -- Dim str As String = dr("规格修改") |
|
-- 作者:nblwar -- 发布时间:2012/9/11 21:06:00 -- 哦,谢谢了 |
|
-- 作者:nblwar -- 发布时间:2012/9/11 21:25:00 -- Dim drs As List(Of DataRow) = DataTables("生产").Select("[当前规格] = \'7.0\'") 不知道怎么写了 [此贴子已经被作者于2012-9-11 21:36:08编辑过]
|
|
-- 作者:czy -- 发布时间:2012/9/11 21:34:00 -- Dim drs As List(Of DataRow) = DataTables("生产").Select("[当前规格] = \'7.0\'") For Each dr As DataRow In drs Dim str As String = dr("规格修改") If str <> "" Then Dim Values() As String Values = str.split(" ") dr("列1") = Values(0) dr("列2") = Values(1) End If Next |
|
-- 作者:nblwar -- 发布时间:2012/9/11 21:40:00 -- 谢谢czy |
|
-- 作者:nblwar -- 发布时间:2012/9/11 22:53:00 -- DataTables("生产").DataCols.Add("user1", Gettype(String))
这个代码不会把得到的结果直接显示出来哦???? 而且日期也不是2012-9-11号的,是1号-11号的 假如我只想看昨天的生产情况,这个日期怎么设置啊 ? [此贴子已经被作者于2012-9-12 6:58:06编辑过]
|
|
-- 作者:lin_hailun -- 发布时间:2012/9/12 9:02:00 -- 楼主什么意思? 感觉代码逻辑没有问题...... 请自查表数据。 |