以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 窗口按钮 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=178185)
|
-- 作者:wlj88868
-- 发布时间:2022/6/22 10:53:00
-- 窗口按钮
Dim r As Row = Tables("销售明细").Current If r("会员余额") < r("实售金额") Then Forms("会员充值").Open() End If Tables("销售明细").Current.Save() Forms("添加销售").Close()
不会执行的 此主题相关图片如下:1655864958874.png
|
-- 作者:wlj88868
-- 发布时间:2022/6/22 10:55:00
--
麻烦老师给看一下,谢谢
|
-- 作者:有点蓝
-- 发布时间:2022/6/22 11:09:00
--
现在是什么问题?"会员充值"窗口打不开?
|
-- 作者:cd_tdh
-- 发布时间:2022/6/22 12:35:00
--
Dim r As Row = Tables("销售明细").Current If r("会员余额") < r("实售金额") Then
r.Save() Forms("会员充值").Open()
Forms("添加销售").Close
Else
r.Save() Forms("添加销售").Close
End If
|
-- 作者:wlj88868
-- 发布时间:2022/6/22 13:11:00
--
现在是确定会员充值的窗口不会开,好像是添加销售是模式窗口,我在试一下,不会在来问老师谢谢
|
-- 作者:cd_tdh
-- 发布时间:2022/6/22 13:18:00
--
我测试这个代码没问题
|
-- 作者:wlj88868
-- 发布时间:2022/6/22 13:18:00
--
根据你的代码,余额小于实售还是可以添加进去不会打开充值窗口呢
|
-- 作者:wlj88868
-- 发布时间:2022/6/22 13:23:00
--
好了,,我把窗口一个字写错了,哈哈,,谢谢老师
|