Foxtable(狐表)用户栏目专家坐堂 → 表格复选弹出提示的问题


  共有2185人关注过本帖平板打印复制链接

主题:表格复选弹出提示的问题

帅哥哟,离线,有人找我吗?
rjh4078
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3355 积分:24732 威望:0 精华:0 注册:2012/3/26 21:47:00
表格复选弹出提示的问题  发帖心情 Post By:2021/12/28 18:39:00 [只看该作者]

在表格BeforeCheckRow事件中写入如下代码,但是同时选中很多行的话就会不停弹出提示,如何做到只弹一次?
Dim lst As List(of Row)
lst=e.Table.GetCheckedRows
If lst.count=0 Then
    Return
End If
Dim i As Integer=0
Dim j As Integer=0
If e.Row("产品编号")<>lst(0)("产品编号")  Then
    e.Cancel=True
    MessageBox.show("不同的产品不能勾选到一起结算!请确认!")
End If

 回到顶部