Foxtable(狐表)用户栏目专家坐堂 → [求助]如何按照调整后的行号排列


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

主题:[求助]如何按照调整后的行号排列

帅哥哟,离线,有人找我吗?
hiliuyong
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
[求助]如何按照调整后的行号排列  发帖心情 Post By:2012/7/9 18:27:00 [只看该作者]

For Each dr As DataRow In dt.datarows
      。。。。。。

 

Next

按照_SortKey排列,这个语句可以实现吗


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/7/10 12:09:00 [只看该作者]

可以:

For Each dr As DataRow In dt.Select("", [_SortKey])
。。。。。。

Next


 回到顶部
帅哥哟,离线,有人找我吗?
hiliuyong
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
  发帖心情 Post By:2012/7/12 2:59:00 [只看该作者]

谢狐狸爸


 回到顶部
帅哥哟,离线,有人找我吗?
hiliuyong
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
  发帖心情 Post By:2012/7/12 3:18:00 [只看该作者]

刚试了下,这段代码通不过

 


 回到顶部
帅哥哟,离线,有人找我吗?
hiliuyong
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
  发帖心情 Post By:2012/7/12 3:21:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/7/12 8:07:00 [只看该作者]

是我糊涂了,应该这样:

 

Dim dt As DataTable = DataTables("表A")
For Each dr As DataRow In dt.Select("","_SortKey")
Next


 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7237 积分:40614 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2012/7/12 8:53:00 [只看该作者]

以下是引用狐狸爸爸在2012-7-12 8:07:00的发言:

是我糊涂了,应该这样:

 

Dim dt As DataTable = DataTables("表A")
For Each dr As DataRow In dt.Select("","_SortKey")
Next

您没有糊涂,教学生就得这样,您都做完了,学生就该不长进了,是楼主自己糊涂,多个dt都不去思考一下就应用上了!

 回到顶部
帅哥哟,离线,有人找我吗?
hiliuyong
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
  发帖心情 Post By:2012/7/12 17:22:00 [只看该作者]

程版,我没糊涂,这句我有,但是就是通过不了。

我也觉得很奇怪,仔细看了很久。

[此贴子已经被作者于2012-7-12 17:24:28编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/7/12 17:28:00 [只看该作者]

前后的差别在红色的部分:

 

 

Dim dt As DataTable = DataTables("表A")
For Each dr As DataRow In dt.Select("", [_SortKey])
Next

 

 

Dim dt As DataTable = DataTables("表A")
For Each dr As DataRow In dt.Select("", "_SortKey")
Next


 回到顶部
帅哥哟,离线,有人找我吗?
hiliuyong
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
  发帖心情 Post By:2012/7/12 17:37:00 [只看该作者]

搞定了,谢谢狐狸爸爸

狐爸这里是加了双引号

不注意看,真看不出来

[此贴子已经被作者于2012-7-12 17:37:57编辑过]

 回到顶部