以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  日期最大值怎么比较  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=186746)

--  作者:edisontsui
--  发布时间:2023/5/26 8:37:00
--  日期最大值怎么比较
我要比较两个日期的最大值,用下面的代码:
Dim mx1 As Date = DataTables("出入库").SQLCompute("max(出入库日期)", "物料编号 = \'" & r("物料编号") & "\' and 指采销单号 =  \'" & r("采购单号") & "\'")
Dim mx2 As Date = DataTables("出入库2").SQLCompute("max(出入库日期)", "物料编号 = \'" & r("物料编号") & "\' and 指采销单号 =  \'" & r("采购单号") & "\'")
Dim mx3 As Date = Math.Max(mx1, mx2)

但是执行起来有问题。请问要怎样修改代码?谢谢。



--  作者:有点蓝
--  发布时间:2023/5/26 8:41:00
--  
Dim mx3 As Date = IIF(mx1>mx2,mx1,mx2)
--  作者:edisontsui
--  发布时间:2023/5/26 9:47:00
--  
For Each r1 As Row In Tables("铝盖板采购单与指令单对照").rows 
      For c As integer = 6 to 10  
             r1(c).Style.BackColor = Color.red
      Next
Next

上面的代码执行后出现如下提示,请问是什么原因?谢谢。

.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:菜单,铝盖板-采购单/指令单对照,Click
详细错误信息:
未找到类型“String”的公共成员“Style”。



--  作者:有点蓝
--  发布时间:2023/5/26 9:49:00
--  
样式只能在drawcell事件里使用
--  作者:edisontsui
--  发布时间:2023/5/26 16:07:00
--  
谢谢。