使用记录窗口编辑时 在表事件的代码不起作用...请帮我看下能如何处理?
作业情境与需求:
>使用者在编辑"抄送对象"(多值列表)、"风险等级"(单选列表) 前 需要先SHOW出作业规定文件给操作者查阅
>必须用记录窗口输入(不在表输入)
目前测试过的做法
1-事先做成展示HTML的窗口
2-在表的 CLICK 事件写入代码
3-在表的 START EDIT 事件写入代码
问题:
1.CLICK 事件 对记录窗口不起作用 不显示窗口 仅显示列表
2. START EDIT 事件 仅显示窗口 不显示列表 →无法编辑
代码如下:
Dim frm As WinForm.Form = Forms("抄送对象")
Dim frt As WinForm.Form = Forms("风险等级")
Select Case e.Col.Name
Case "会办抄送"
With CurrentTable
If currentTable.AllowEdit = False Then
.Current.Locked = True
e.Cancel = True
End If
If .Current.Locked = False Then
frm.Open()
Else
e.Cancel = True
End If
End With
Case "风险评估"
With CurrentTable
If currentTable.AllowEdit = False Then
.Current.Locked = True
e.Cancel = True
End If
If .Current.Locked = False Then
frt.Open()
Else
e.Cancel = True
End If
End With
End Select