| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 579 人关注过本帖
标题:请问这段代码有问题吗?
取消只看楼主 加入收藏
smart921
Rank: 1
等 级:新手上路
帖 子:107
专家分:9
注 册:2010-8-8
结帖率:86.96%
收藏
已结贴  问题点数:18 回复次数:1 
请问这段代码有问题吗?
请问这段代码有问题吗?运行后提示“操作符/操作类型不匹配”!
local findstr,oldrecord
oldrecord=recno()
set exact off
do case
case thisform.findtype.value=1
   findstr=alltri(thisform.findkey.value)+"$xm"
case thisform.findtype.value=2
   findstr=alltri(thisform.findkey.value)+"$scbh"
endcase
sele txxx
set filt to &findstr
go top
do while .not.eof()
  txxx.refresh
  thisform.windowstate=1
  if messagebox("是此人吗?",4+32,"离退休信息核对")=6
    exit
  else
    skip
    txxx.refresh
  endif
  thisform.windowstate=0
enddo
if eof()
  messagebox("未找到此人吗?",4+32,"离退休信息核对")
  go oldrecord
endif
set filt to
txxx.refresh
thisform.release
搜索更多相关主题的帖子: 信息 local 
2011-05-06 08:18
smart921
Rank: 1
等 级:新手上路
帖 子:107
专家分:9
注 册:2010-8-8
收藏
得分:0 
回复 楼主 smart921
非常感谢!我已经将另一张表单“离退休信息核对”的NAME设为“TXXX”了,可是运行后还显示“找不到对象TXXX”!
2011-05-06 09:13
快速回复:请问这段代码有问题吗?
数据加载中...
 
   



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

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