- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求平均值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70608)
-- 发布时间：2015/6/25 8:06:00
-- 求平均值
狐表老师早上好。
根据名称求卖出和买入平均价。谢谢
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:平均值.table |
-- 发布时间：2015/6/25 8:50:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:平均值 (1).table |
-- 发布时间：2015/6/25 9:35:00
--
老师谢谢。
-- 发布时间：2015/6/25 13:13:00
--
老师，怎样彻底锁定已编辑好表的逻辑列，下面是针对 逻辑列的代码，
If e.DataRow.isnull(e.DataCol.name)=False Then
If e.DataCol.name.StartsWith("买入") Then
e.DataRow("操作")=True
Else If e.DataCol.name.StartsWith("卖出") Then
e.DataRow("操作")=False
End If
End If
-- 发布时间：2015/6/25 14:04:00
--
什么意思? 没看懂
-- 发布时间：2015/6/25 14:14:00
--
当编辑好行后彻底锁定“操作”的逻辑列不让他变来变去
此主题相关图片如下：image 7.png
-- 发布时间：2015/6/25 14:17:00
--
prepareEdit事件
If e.Col.Name = "操作" Then
If e.Row.IsNull("买入") = False OrElse e.Row.IsNull("卖出") = False Then
e.cancel = True
End If
End If
-- 发布时间：2015/6/25 14:18:00
--
或者datacolchanged事件
If e.DataRow.isnull(e.DataCol.name)=False Then
If e.DataCol.name.StartsWith("买入") Then
e.DataRow("操作")=True
Else If e.DataCol.name.StartsWith("卖出") Then
e.DataRow("操作")=False
End If
e.DataRow.Locked = True
End If
-- 发布时间：2015/6/25 16:24:00
--
狐表老师，在执行锁定该行时给他一个条件有几个单元格中必须有数据后才能锁定。
If e.DataRow.isnull(e.DataCol.name)=False Then
If e.DataCol.name.StartsWith("买入") Then
e.DataRow("操作")=True
Else If e.DataCol.name.StartsWith("卖出") Then
e.DataRow("操作")=False
End If
e.DataRow.Locked = True
End If
-- 发布时间：2015/6/25 17:30:00
--
If e.DataRow.isnull(e.DataCol.name)=False Then
If e.DataCol.name.StartsWith("买入") Then
e.DataRow("操作")=True
Else If e.DataCol.name.StartsWith("卖出") Then
e.DataRow("操作")=False
End If
If (e.DataRow.IsNull("买入")=False AndAlso e.DataRow.IsNull("买入量")=False) OrElse (e.DataRow.IsNull("卖出")=False AndAlso e.DataRow.IsNull("卖出量")=False)
e.DataRow.Locked = True
End If
End If