| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1289 人关注过本帖
标题:奇怪!
只看楼主 加入收藏
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 

*将TEXT的INPUTMASK设置成与NO相同宽度的格式
COUNT FOR no=this.Value TO x
DO CASE
CASE EMPTY(ALLTRIM(this.Value))
MESSAGEBOX("请输入编号!",48,"提示")
RETURN .F.

CASE x>=1
MESSAGEBOX("该编号已有供应商,请重新输入!",48,"提示")
RETURN .F.

CASE X<1
RETURN .T.

ENDCASE
thisform.Refresh


感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2006-06-08 16:05
xbj222
Rank: 1
等 级:新手上路
帖 子:179
专家分:0
注 册:2006-2-6
收藏
得分:0 
更惨,变成死循环了.我输入表里面没有的编号,却提示"该编号已有供应商,请重新输入",然后text1就变暗了,提示"请输入编号",跳不出来了.同时右上角还是提示无效输入

2006-06-08 16:19
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
(1)你要将TEXT的INPUMASK设置成与字段NO相同的输入宽度,即输入XXXXXXXX(X的个数就是NO的宽度)
(2)TEXT变暗不是这段程序控制的(也许你在REFRESH这个方法中加了些代码)
(3)你要是认为数据输入正常就应该保存下来啊,我没有对你当X<1这种情况进行处理。你自己处理吧
(4)TEXT不要与表捆绑起来

[此贴子已经被作者于2006-6-8 16:46:41编辑过]


感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2006-06-08 16:29
xbj222
Rank: 1
等 级:新手上路
帖 子:179
专家分:0
注 册:2006-2-6
收藏
得分:0 
我对inputmask设置了同等宽度,refresh方法没有代码啊.我输入第一个就提示不行了,怎么保存呢??下班了,明天继续吧!

2006-06-08 16:38
blueblood
Rank: 2
等 级:新手上路
威 望:4
帖 子:135
专家分:0
注 册:2006-4-2
收藏
得分:0 
我猜测,你的TEXT的ControlSource设置了某表的字段。
而你程序中的COUNT命令执行后,将指针指向了EOF,所以TEXT变灰了
2006-06-08 19:02
xbj222
Rank: 1
等 级:新手上路
帖 子:179
专家分:0
注 册:2006-2-6
收藏
得分:0 

是啊,是啊,有绑定字段啊.请问那要怎么做才行呢?


2006-06-09 08:33
blueblood
Rank: 2
等 级:新手上路
威 望:4
帖 子:135
专家分:0
注 册:2006-4-2
收藏
得分:0 
如果绑定字段是非要不可的,那你在count命令之前,增加"JLH=recno()"命令,在COUNT之后,增加“goto jlh"命令;这是一个参考思路,你也可以根据你的具体情况,使用其他方法。总之,就是不能使指针指向EOF!
2006-06-09 11:15
xbj222
Rank: 1
等 级:新手上路
帖 子:179
专家分:0
注 册:2006-2-6
收藏
得分:0 
谢谢~!!

2006-06-09 11:59
xbj222
Rank: 1
等 级:新手上路
帖 子:179
专家分:0
注 册:2006-2-6
收藏
得分:0 
对了,能不能告诉我"JLH=recno()   goto jlh" 那是什么意思呢?

2006-06-09 12:01
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
收藏
得分:0 
JLH=recno()
操作前,将当前记录号存入变量jlh
操作后
用 goto jlh 回到操作前的记录.
go 3
goto 3
将记录指针移到第三条记录

认真看书学习,弄通Fox主义。
2006-06-09 13:53
快速回复:奇怪!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.050392 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved