Foxtable(狐表)用户栏目专家坐堂 → [求助]datacolchanged调用窗体


  共有3648人关注过本帖树形打印复制链接

主题:[求助]datacolchanged调用窗体

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


加好友 发短信
等级:婴狐 帖子:48 积分:684 威望:0 精华:0 注册:2020/1/30 16:18:00
[求助]datacolchanged调用窗体  发帖心情 Post By:2021/1/26 16:22:00 [显示全部帖子]

Select Case e.DataCol.Name
    Case  "预计成本"
                
        Dim dr3 As DataRow=DataTables("项目表").Find("_identify='"& e.datarow("所属子项目编号") &"'")
        If dr3 IsNot Nothing Then
            dr3("金额合计")=e.DataRow("概算合计")
           
        End If
       
End Select
'-------------------------以下代码,窗口不打开时,执行报错,调用目标异常
If Forms("窗口打开项目").Opened Then   
    Dim brb As WinForm.Button=Forms("窗口打开项目").Controls("btn按钮刷新")
    brb.PerformClick
End If

 回到顶部