以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  DrawCell 动态引用  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=151671)

--  作者:nxdx112
--  发布时间:2020/6/30 16:22:00
--  DrawCell 动态引用
DrawCell 动态引用   标出的地方想动态引用“可住人数“”该列的数据,该列数据不是固定值,如何修改
If e.Col.Name = "状态" Then \'如果正在绘制的是密码列
    
    If e.Row("空余床位") = 0 Then
        e.Style = "满"
    ElseIf e.Row("空余床位") = 8 Then
        e.Style = "空"
    ElseIf e.Row("空余床位") >= 1 AndAlso e.Row("空余床位") < 8 Then
        e.Style = "余"
        
    End If
    
End If

--  作者:有点蓝
--  发布时间:2020/6/30 16:50:00
--  
ElseIf e.Row("空余床位") = e.Row("可住人数") Then
--  作者:nxdx112
--  发布时间:2020/6/30 17:16:00
--  
为什么代码在DataColChanged  中根据“可以床位”的数字,在“状态”列填写对应的文字  不执行,显示错误,需要改那点。谢谢!
If e.DataCol.Name = "空余床位" Then \'如果正在绘制的是密码列
    If e.DataRow("空余床位") = 0 Then
        e.DataRow("状态") = "满"
    ElseIf e.DataRow("空余床位") = e.Row("可住人数") Then
        e.DataRow("状态") = "空"
    ElseIf e.DataRow("空余床位") >= 1 AndAlso e.Row("空余床位") < e.Row("可住人数")  Then
        e.DataRow("状态") = "余"
    ElseIf e.DataRow("空余床位") < 0 Then
        e.DataRow("状态") = "出错"
    End If
End If


--  作者:有点蓝
--  发布时间:2020/6/30 17:30:00
--  
先仔细看一遍:http://www.foxtable.com/webhelp/topics/0604.htm

ElseIf e.DataRow("空余床位") = e.DataRow("可住人数") Then