以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]表事件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=162424)

--  作者:天一生水
--  发布时间:2021/4/14 15:27:00
--  [求助]表事件
老师好!
我写了一段PrepareEdit代码,当在窗口取消e.Row("艾忘计划")勾选时,不断弹出代码中的“提示”,是哪里的问题?
谢谢!

If Forms("练习日志").opened Then
    If e.Col.Name = "艾忘计划" And e.Row("艾忘计划") = True Then
        Dim Result As DialogResult
        Result = MessageBox.Show("取消勾选将删除该条记录的所有计划", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        If Result = DialogResult.Yes Then
            
            Dim dt As DataTable = DataTables("计划表")
            Dim dt1 As DataTable = DataTables("艾宾浩斯")
            dt.DeleteFor("ID = \'" & e.Row("ID") & "\'")
            dt1.DeleteFor("ID = \'" & e.Row("ID") & "\'")
            
        Else
            Return
        End If
    End If
End If

图片点击可在新窗口打开查看此主题相关图片如下:截屏图片.jpg
图片点击可在新窗口打开查看



--  作者:有点蓝
--  发布时间:2021/4/14 15:36:00
--  
因为不会看帮助:http://www.foxtable.com/webhelp/topics/0605.htm