| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- select case 值不变 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=169580) |
| -- 作者：ycs5801 -- 发布时间：2021/6/21 21:13:00 -- select case 值不变 Select Case e.DataCol.Name Case "mmark","dm" \'\'dm2获取公式 Dim dr As DataRow=e.DataRow If dr.IsNull("mmark") Then dr("dm2")=Nothing Else Select Case dr("mmark") Case "before" dr("dm2")=dr("dm") Case "on" dr("dm2")=0 Case "after" dr("dm2")=-dr("dm") End Select End If End Select 上述代码，刚开始mmark为空的时候dm值手动更改，然后mmark变化了，但是dm2的值还是不变。 求解决方案。
|
| -- 作者：有点蓝 -- 发布时间：2021/6/21 21:17:00 -- Select Case e.DataCol.Name Case "mmark","dm" \'\'dm2获取公式 Dim dr As DataRow=e.DataRow If dr.IsNull("mmark") Then dr("dm2")=Nothing Else msgbox(dr("mmark")) Select Case dr("mmark") Case "before" msgbox("before") dr("dm2")=dr("dm") Case "on" msgbox("on") dr("dm2")=0 Case "after" msgbox("after") dr("dm2")=-dr("dm") End Select msgbox(dr("dm2")) End If End Select |
| -- 作者：ycs5801 -- 发布时间：2021/6/21 21:41:00 -- 就是说我这个代码没有明显错误啊 |
| -- 作者：有点蓝 -- 发布时间：2021/6/21 21:44:00 -- mmark变化后分别弹出什么提示框？ |
| -- 作者：ycs5801 -- 发布时间：2021/6/21 22:12:00 -- 我才发现，我那个mmark有默认值，一次出现on，on，0 |
| -- 作者：有点蓝 -- 发布时间：2021/6/21 22:28:00 -- 那不就对了 |
| -- 作者：ycs5801 -- 发布时间：2021/6/21 22:28:00 -- 啥意思？ |
| -- 作者：有点蓝 -- 发布时间：2021/6/21 22:29:00 -- mmark值等于"on"，"dm2"值就等于0，有什么不对 Case "on" dr("dm2")=0
[此贴子已经被作者于2021/6/21 22:29:11编辑过]
|