Foxtable(狐表)用户栏目专家坐堂 → [求助]如何查找连续序号中哪些被中断?


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

主题:[求助]如何查找连续序号中哪些被中断?

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/8/8 8:48:00 [显示全部帖子]

Dim lst1 As List(Of String) = DataTables("表A").GetValues("第一列","第一列 >= '037' And 第一列 <= '105'") ‘要查询的编号区间
Dim lst2 As New List(Of String)
For i As Integer = 37 To 105
    If lst1.Contains(CStr(i).PadLeft(3,"0")) = False Then
        lst2.Add(CStr(i).PadLeft(3,"0"))
    End If
Next
For Each s As String In lst2
    Output.Show(s) ’缺失的编号
Next

 回到顶部