| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1080 人关注过本帖
标题:vfp9.0中表单执行输入编号后一直弹出“函数参数的值、类型或数目无效”是怎 ...
取消只看楼主 加入收藏
iTam
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-12-2
结帖率:0
收藏
已结贴  问题点数:20 回复次数:3 
vfp9.0中表单执行输入编号后一直弹出“函数参数的值、类型或数目无效”是怎么回事
*设置txt读者编号的interactivechange 事件代码
IF LEN(ALLTRIM(thisform.pageframe1.page1.txt读者编号.Value))=6
SELECT 读者信息
LOCATE FOR 读者编号=ALLTRIM(thisform.pageframe1.page1.txt读者编号.Value)
IF FOUND()
  thisform.pageframe1.page1.txt读者姓名.Value=读者信息.读者姓名
  thisform.pageframe1.page1.txt借书额度.Value=读者信息.借书额度
  thisform.pageframe1.page1.txt已借书数.Value=读者信息.已借书数
  SET FILTER TO
ELSE
  MESSAGEBOX("读者信息库中无此编号为"+ALLTRIM(thisform.pageframe1.page1.txt读者编号.Value)+"的读者!",48,"警告")
  thisform.pageframe1.page1.txt读者编号.Value=""
  thisform.pageframe1.page1.txt读者姓名.Value=""
  thisform.pageframe1.page1.txt借书额度.Value=""
  thisform.pageframe1.page1.txt已借书数.Value=""
 ENDIF
SELECT 借阅信息
 SET FILTER TO 读者编号=ALLTRIM(thisform.pageframe1.page1.txt读者编号.Value)
 thisform.pageframe1.page1.grid2.Refresh
 thisform.pageframe1.page1.grid2.Visible=.T.
ENDIF
搜索更多相关主题的帖子: 读者 信息 姓名 
2015-12-04 10:35
iTam
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-12-2
收藏
得分:0 
回复 3楼 sdta
字符型
2015-12-04 10:51
iTam
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-12-2
收藏
得分:0 
回复 5楼 tlliqi
是的
2015-12-04 11:35
iTam
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-12-2
收藏
得分:0 
回复 7楼 sdta
那要怎样改
2015-12-04 11:45
快速回复:vfp9.0中表单执行输入编号后一直弹出“函数参数的值、类型或数目无效” ...
数据加载中...
 
   



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

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