回 帖 发 新 帖 刷新版面

主题:文本框问题

我想在表单的TEXT1中的LOSTFOCUS里写代码
SELECT m_37 FROM tblstock WHERE ALLTRIM(product)==ALLTRIM(curout.product);
 AND ALLTRIM(color)==ALLTRIM(curout.color) INTO ARRAY  njcz
 IF this.Value >njcz
 =MESSAGEBOX("库存商品不足!",0+64,"提示")
 this.Value =0
 RETURN 
 ENDIF 
this.Refresh 
目的是在TEXT1中输入值后,检测在表TBLSTOCK中m_37字段的数值相比较.来看库存商品的情况,这样写为什么不行?怎样写好?

回复列表 (共3个回复)

沙发

IF this.Value >njcz

數值跟數組名比較?

IF this.Value >njcz(1)對嗎?

板凳

不对

3 楼

代码有问题,事件更有问题。代码问题自己解决,事件应写在 Valid 事件中。

注意,返回要用

Return 0  && 是数字 0,不是字母 O

当然,你也可以更改数字,你会看到其他的效果。

详细信息,请参看帮助中 Valid 事件的解释。

我来回复

您尚未登录,请登录后再回复。点此登录或注册