Foxtable(狐表)用户栏目专家坐堂 → datatablebuilder 生成的列怎样排序呀?


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

主题:datatablebuilder 生成的列怎样排序呀?

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


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

呵呵,这样啊,要不楼主你做个例子发上来,我们帮你研究一下。
[此贴子已经被作者于2013-4-2 17:31:57编辑过]

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


加好友 发短信
等级:幼狐 帖子:58 积分:831 威望:0 精华:0 注册:2012/1/29 17:10:00
  发帖心情 Post By:2013/4/2 17:33:00 [只看该作者]

好,==

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


加好友 发短信
等级:幼狐 帖子:58 积分:831 威望:0 精华:0 注册:2012/1/29 17:10:00
  发帖心情 Post By:2013/4/2 17:48:00 [只看该作者]

 

表单, 按钮生成代码没完善

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目60.table


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


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

你不排序,按照原来表中的顺序就行了,例如:

 

Dim dtb As New DataTableBuilder("颜色尺码")
dtb.AddDef("颜色", Gettype(String), 32)
For Each dr As DataRow In DataTables("尺码").DataRows
    If dr("尺码组编号") = 1 Then
        dtb.AddDef(dr("尺码名称"), Gettype(Double))
    End If
    dtb.Build()
Next
MainTable = Tables("颜色尺码")


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


加好友 发短信
等级:小狐 帖子:302 积分:1860 威望:0 精华:0 注册:2012/4/27 11:34:00
  发帖心情 Post By:2013/4/2 17:59:00 [只看该作者]

Dim txtstr As Integer = e.Form.Controls("ComboBox1").Value
Dim dtb As New DataTableBuilder("颜色尺码")
dtb.AddDef("颜色", Gettype(String), 32)

For Each dr As DataRow In DataTables("尺码").Select("尺码组编号 = " & txtstr ,"尺码编号")
    dtb.AddDef(dr("尺码名称"), Gettype(Double)) 
Next
dtb.Build()
MainTable = Tables("颜色尺码")

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


加好友 发短信
等级:幼狐 帖子:58 积分:831 威望:0 精华:0 注册:2012/1/29 17:10:00
  发帖心情 Post By:2013/4/2 18:04:00 [只看该作者]

 

呵呵,这个好用,TKS


 回到顶部
总数 16 上一页 1 2