Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]字符型列 起讫号 转换代码？


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

主题：[求助]字符型列 起讫号 转换代码？
帅哥哟，离线，有人找我吗？
lsy
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00 		  发帖心情 Post By：2016/4/2 16:36:00 [只看该作者]

分段最大最小号：

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:分段最大最小号.table
 回到顶部
帅哥哟，离线，有人找我吗？
方丈
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：803 积分：10775 威望：0 精华：1 注册：2008/9/2 18:58:00 		  发帖心情 Post By：2016/4/2 17:41:00 [只看该作者]

谢谢lsy
 回到顶部
帅哥哟，离线，有人找我吗？
方丈
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：803 积分：10775 威望：0 精华：1 注册：2008/9/2 18:58:00 		  发帖心情 Post By：2016/4/3 10:21:00 [只看该作者]

请教：

不知能不能弄成“起讫号明细表”那种形式，用“起始号1”、“结束号1”、“起始号2”、“结束号2”.....来表示？

[此贴子已经被作者于2016/4/3 10:21:31编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/4/3 13:09:00 [只看该作者]

Dim drs As List(Of DataRow) = DataTables("学籍信息库").Select("", "班级,学业考试报名号")
Dim pdr As DataRow = Nothing
Dim bj As String = ""
Dim str As String = ""
For Each dr As DataRow In drs
    If pdr Is Nothing Then
        bj = dr("班级")
        str = dr("学业考试报名号")
    ElseIf dr("班级")<>pdr("班级") Then
        str &= "-" & pdr("学业考试报名号")
        output.show(bj & ":" & str)
        bj = dr("班级")
        str = dr("学业考试报名号")
    ElseIf dr("学业考试报名号")<>pdr("学业考试报名号")+1 Then
        str &= "-" & pdr("学业考试报名号") & "," & dr("学业考试报名号")
    End If
    pdr = dr
Next
If pdr IsNot Nothing Then
    Dim dr As DataRow = pdr
    pdr = drs(drs.count-2)
    If dr("班级")<>pdr("班级") Then
        str &= "-" & pdr("学业考试报名号")
        output.show(bj & ":" & str)
        bj = dr("班级")
        str = dr("学业考试报名号")
    ElseIf dr("学业考试报名号")<>pdr("学业考试报名号")+1 Then
        str &= "-" & pdr("学业考试报名号") & "," & dr("学业考试报名号")
    End If
    str &= "-" & dr("学业考试报名号")
    output.show(bj & ":" & str)
End If

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


加好友 发短信
等级：四尾狐 帖子：803 积分：10775 威望：0 精华：1 注册：2008/9/2 18:58:00 		  发帖心情 Post By：2016/4/3 22:21:00 [只看该作者]

在内部表执行正常，在外部数据源执行 出现下面的提示

 

 


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20160403221908.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
方丈
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：803 积分：10775 威望：0 精华：1 注册：2008/9/2 18:58:00 		  发帖心情 Post By：2016/4/3 23:29:00 [只看该作者]

解决了，都是空值惹的祸

 回到顶部
总数 16 上一页 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.04688 秒, 5 次数据查询