以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求教老师们指点迷津  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=25429)

--  作者:mamuaiqing
--  发布时间:2012/11/9 4:48:00
--  求教老师们指点迷津

Dim Result As DialogResult
Result = MessageBox.Show("商品已经出库了吗?", "提示", MessageBoxButtons.OKCancel, MessageBoxIcon.Question)
If Result = DialogResult.OK Then
    If Tables("商品销售").Current("商品类别")="" Then
        MessageBox.Show("请输入商品类别!","提示!")
        e.Cancel = True
    ElseIf Tables("商品销售").Current("销售数量")="" Then
        MessageBox.Show("请输入销售数量!","提示!")
        e.Cancel = True
    Else
        DataTables("商品日期").Save()
        DataTables("商品销售").Save()
        MessageBox.Show("保存完毕!","提示!")
    End If
Else
    e.Cancel = True
End If

 

在命令窗口中输入上面的代码出现了如图所示的错误,求教老师们指点迷津,代码该怎么改


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

--  作者:新福星
--  发布时间:2012/11/9 7:12:00
--  

把e.Cancel = True 全部改为Return  ;e参数只能用在事件了


--  作者:lin_hailun
--  发布时间:2012/11/9 8:39:00
--  
 楼主用e.Cancel = True 想达到的目的是什么?

--  作者:mamuaiqing
--  发布时间:2012/11/9 20:59:00
--  

上面的代码是用在保存按妞中,先提示用户销售的商品出库了没,如果“是”则执行代码验证列中的内容输入与否,验证同过后保存并提示,如果“否”则取消此次操作


--  作者:有点甜
--  发布时间:2012/11/9 21:03:00
--  

这样的代码怎么能设置在命令窗口? 命令窗口有e参数吗?

你看看:

http://www.foxtable.com/help/topics/1840.htm

 

 

验证输入的代码,应该设置下面两个事件中的一个:

 

http://www.foxtable.com/help/topics/0617.htm

http://www.foxtable.com/help/topics/0624.htm

 


--  作者:mamuaiqing
--  发布时间:2012/11/10 1:22:00
--  
图片点击可在新窗口打开查看感谢老师们的指点,继续努力学习