主题：非关联表之间的数据同步

    

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:非关联表之间的数据同步.table

     

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:非关联表之间的数据同步.table

  请看完数据统计一章->分组统计

 

http://www.foxtable.com/help/topics/00143.htm

 

 就是简单的分组统计啊。如果要根据批次，那就加入一列批次列就行啊

 没有影响。你要的就是分组统计而已。

 做一个辅助列，比如叫做 是否计入，领取包装的时候，勾选即可。

 你可以合并不正确，就是你数据有问题。空行问题可以设置条件 mg.Fitler = "设备型号 is not null"

 

 或者你可以用代码合并 http://www.foxtable.com/help/topics/2334.htm

 

Dim d1 As Date = e.Row("上次保养时间")
Dim d2 As Date = Date.today
Dim t As TimeSpan = d2 - d1
Dim d As Single = t.TotalDays
Dim Pt As String = e.Row("材料名称")
If e.Row.IsNull("上次保养时间") = False Then
    Select Case pt
        Case "机油"
            If d >= 83 AndAlso d < 89 Then
                e.style = "近期"
            Else If d >= 89 AndAlso d < 97 Then
                e.Style = "到期"
            Else If d >= 97 AndAlso d < 105 Then
                e.style = "超期"
            Else If d >=105 Then
                e.Style = "严重超期"
            End If
        Case "齿轮油"
            If d >= 173 AndAlso d < 179 Then
                e.style = "近期"
            Else If d >= 179 AndAlso d < 187 Then
                e.Style = "到期"
            Else If d >= 187 AndAlso d < 195 Then
                e.style = "超期"
            Else If d >=195 Then
                e.Style = "严重超期"
            End If
    End Select
End If

 这样处理一下，参考代码

 

Dim str As String = "2014-12-27 0:00:00|2014-12-28 0:00:00"
Dim reg As new System.Text.RegularExpressions.Regex(" +.+\|+")
str = reg.replace(str & "|", "|")
msgbox(str.Trim("|"))

 代码写给你了啊

 

Dim str As String = DataTables("材料领用表").GetComboListString("领用时间","使用地点 = '" & djmc.value & "'")
Dim reg As new System.Text.RegularExpressions.Regex(" +.+\|+")
str = reg.replace(str & "|", "|")
e.sender.ComboList = str.Trim("|")