此主题相关图片如下：g(pwczwl(rmzzg~h0nbaxl.png
如图我想实现的是若我没有点击添加缺勤项目，我是无法在病假天数和事假天数两列填写数据的
因此我在窗口afterload里面写了
DataTables("月度考核填报_Table1").DataCols("病假天数").AllowEdit = False
DataTables("月度考核填报_Table1").DataCols("事假天数").AllowEdit = False
在表事件（表类型是查询表）里
此主题相关图片如下：bxo}rn7u~j}su1iyf5_(6n.png
afterselrange事件里写了代码：
DataTables("月度考核填报_Table1").DataCols("病假天数").AllowEdit = False
Dim c As Col = e.Table.Cols(e.NewRange.ColSel)
Select Case c.name
Case "病假天数","事假天数"
messagebox.show("请点击添加缺勤项目按钮添加请假天数","提示")
End Select
但我在添加缺勤项目按钮里写DataTables("月度考核填报_Table1").DataCols("病假天数").AllowEdit = true
点击缺勤项目就会触发表afterselrange事件报错，如何实现我点击添加缺勤项目，病假天数和事假天数两列就可以编辑而且还要判断其中一列值不为空，最好是只能在缺勤项目这行编辑这两列
此主题相关图片如下：y$$usgmnqnkqkc39z)r9v.png
加好友 
发短信
Post By：2018/11/9 17:16:00 [只看该作者]
