以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于（BeforeSelRangeChange）代码无效  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=82355)
--  作者：kao_go
--  发布时间：2016/3/16 14:01:00
--  关于（BeforeSelRangeChange）代码无效
窗口表中
currentchanged事件中代码：MessageBox.Show("报告")


BeforeSelRangeChange中事件代码：
If e.Table.AllowEdit=True Then    
    e.Cancel=True   \'编辑状态不允许选择其他行
End If
If e.NewRange.BottomRow-e.NewRange.TopRow>0 Then
    e.Cancel=True   \'不允许选择多行
End If

要实现的目的是：表在编辑状态不允许选择其他行，这样设置后，点击其他行是选择不到，但是currentchanged事件中的代码一直会执行，或者点击窗口中其他表后，再返回在编辑的行也是会执行currentchanged事件

[此贴子已经被作者于2016/3/16 14:04:11编辑过]
--  作者：kao_go
--  发布时间：2016/3/16 14:37:00
--  
求救
--  作者：大红袍
--  发布时间：2016/3/16 14:38:00
--  

 currentChanged

 

static idx As Integer = e.Table.current.Index
If idx <> e.Table.current.Index Then
    msgbox(e.Table.current.Index)
    idx = e.Table.current.Index
End If
--  作者：kao_go
--  发布时间：2016/3/16 15:24:00
--  
谢谢老师