VFP表单查找-CSDN论坛

VFP表单查找

其他数据库开发 > VFP

收藏回复

[问题点数：20分，结帖人macd43561]

⋅日期 ⋅VFP判断为空 ⋅vfp有条件查找 更多帖子 关注私信空间博客 macd43561 等级 本版专家分：0 结帖率 53.85%: 各位帮帮忙,我用VFP做一个图书管理系统的借书界面,当输入借书证号按回车键,界面中的姓名自动出现,当输入图书证号按回车键,界面中的书名自动出现.读者的表为reader.dbf, 书信息的表为book.dbf. 我在实现时第一步能实现,但第二步总是显示"图书证号错误".请大家帮我看看那边出了问题,是不是表book没打开?应该怎么实现?急!急!
LPARAMETERS nKeyCode, nShiftAltCtrl
if   nKeyCode=13
use f:\图书管理系统\book.dbf
private tsbh
select book
tsbh=alltrim(thisform.text5.value)
if found() and alltrim(图书编号)=alltrim(thisform.text5.value)
    select * from book where 图书编号==tsbh
    thisform.text6.value=书名
    thisform.text7.value=作者
    thisform.text8.value=价格
    thisform.refresh
else
    messagebox("图书编号错误！",48,"警告")
    thisform.refresh
endif
endif

2009-04-13 11:07:46

点赞只看楼主引用举报楼主收起

展开阅读全文

⋅求助添加config配置 ⋅MDI子窗口最大化问题 ⋅PC机操作PDA中的文件，求教 更多帖子 关注私信空间博客 msd88 等级 本版专家分：467



If nKeyCode=13

    use f:\图书管理系统\book.dbf alias book in 0

    local c_tsbh

    select book

    c_tsbh=alltrim(thisform.text5.value)

    Locate all for alltrim(图书编号)=c_tsbh

    If Found()

        thisform.text6.value=书名

         thisform.text7.value=作者

         thisform.text8.value=价格

    else

        messagebox("图书编号错误！",48,"警告")

   endif

endif

2009-04-13 11:38:58

点赞只看TA 引用举报 #1得分 20

⋅串口控件(mscomm32.ocx)引发的C0000005错误

⋅用了VFP这么久，突然发现一个有趣的问题。

⋅【祝大家春节快乐！】

更多帖子

关注私信空间博客

版主

十豆三

等级

本版专家分：216690

勋章

优秀版主 2014年11月论坛优秀版主

红花 2008年11月其他数据库开发大版内专家分月排行榜第一
2008年10月其他数据库开发大版内专家分月排行榜第一
2008年6月其他数据库开发大版内专家分月排行榜第一
2007年3月其他数据库开发大版内专家分月排行榜第一
2007年1月其他数据库开发大版内专家分月排行榜第一
2006年10月其他数据库开发大版内专家分月排行榜第一
2006年1月其他数据库开发大版内专家分月排行榜第一
2005年8月其他数据库开发大版内专家分月排行榜第一
2005年7月其他数据库开发大版内专家分月排行榜第一
2005年6月其他数据库开发大版内专家分月排行榜第一
2005年5月其他数据库开发大版内专家分月排行榜第一

黄花 2012年2月其他数据库开发大版内专家分月排行榜第二
2011年12月其他数据库开发大版内专家分月排行榜第二
2010年10月其他数据库开发大版内专家分月排行榜第二
2010年2月其他数据库开发大版内专家分月排行榜第二
2009年2月其他数据库开发大版内专家分月排行榜第二
2008年12月其他数据库开发大版内专家分月排行榜第二
2008年9月其他数据库开发大版内专家分月排行榜第二
2008年7月其他数据库开发大版内专家分月排行榜第二
2008年3月其他数据库开发大版内专家分月排行榜第二
2007年8月其他数据库开发大版内专家分月排行榜第二
2007年4月其他数据库开发大版内专家分月排行榜第二
2007年2月其他数据库开发大版内专家分月排行榜第二
2006年11月其他数据库开发大版内专家分月排行榜第二
2006年3月其他数据库开发大版内专家分月排行榜第二
2006年2月其他数据库开发大版内专家分月排行榜第二
2005年12月其他数据库开发大版内专家分月排行榜第二
2005年11月其他数据库开发大版内专家分月排行榜第二
2005年10月其他数据库开发大版内专家分月排行榜第二
2005年2月其他数据库开发大版内专家分月排行榜第二
2004年12月其他数据库开发大版内专家分月排行榜第二

蓝花 2014年1月其他数据库开发大版内专家分月排行榜第三
2013年11月其他数据库开发大版内专家分月排行榜第三
2013年8月其他数据库开发大版内专家分月排行榜第三
2012年8月其他数据库开发大版内专家分月排行榜第三
2011年10月其他数据库开发大版内专家分月排行榜第三
2011年2月其他数据库开发大版内专家分月排行榜第三
2010年9月其他数据库开发大版内专家分月排行榜第三
2010年8月其他数据库开发大版内专家分月排行榜第三
2010年7月其他数据库开发大版内专家分月排行榜第三
2010年6月其他数据库开发大版内专家分月排行榜第三
2010年3月其他数据库开发大版内专家分月排行榜第三
2009年8月其他数据库开发大版内专家分月排行榜第三
2009年7月其他数据库开发大版内专家分月排行榜第三
2009年6月其他数据库开发大版内专家分月排行榜第三
2009年3月其他数据库开发大版内专家分月排行榜第三
2009年1月其他数据库开发大版内专家分月排行榜第三
2008年8月其他数据库开发大版内专家分月排行榜第三
2008年5月其他数据库开发大版内专家分月排行榜第三
2007年11月其他数据库开发大版内专家分月排行榜第三
2007年10月其他数据库开发大版内专家分月排行榜第三
2007年7月其他数据库开发大版内专家分月排行榜第三
2007年6月其他数据库开发大版内专家分月排行榜第三
2007年5月其他数据库开发大版内专家分月排行榜第三
2006年12月其他数据库开发大版内专家分月排行榜第三
2006年8月其他数据库开发大版内专家分月排行榜第三
2006年4月其他数据库开发大版内专家分月排行榜第三
2005年9月其他数据库开发大版内专家分月排行榜第三
2005年4月其他数据库开发大版内专家分月排行榜第三
2005年3月其他数据库开发大版内专家分月排行榜第三
2005年1月其他数据库开发大版内专家分月排行榜第三
2004年11月其他数据库开发大版内专家分月排行榜第三
2004年10月其他数据库开发大版内专家分月排行榜第三
2004年9月其他数据库开发大版内专家分月排行榜第三

Lparameters nKeyCode, nShiftAltCtrl

If  nKeyCode=13 And !Empty(Thisform.text5.Value)

	If !Used("book")

		Use F:\图书管理系统\book.Dbf Alias book  In 0

	Endif

	Select book

	m.tsbh=Alltrim(Thisform.text5.Value)

	Locate For Alltrim(图书编号)==m.tsbh

	If Found()

		Thisform.text6.Value=书名

		Thisform.text7.Value=作者

		Thisform.text8.Value=价格

		Thisform.Refresh

	Else

		Messagebox("图书编号错误！",48,"警告")

	Endif

Endif

如果此代码在 Text5 的 Keypress 事件中，也可以这样：

Lparameters nKeyCode, nShiftAltCtrl

If  nKeyCode=13 And !Empty(This.Value)

	If !Used("book")

		Use F:\图书管理系统\book.Dbf Alias book  In 0

	Endif

	Select book

	m.tsbh=Alltrim(This.Value)

	Locate For Alltrim(图书编号)==m.tsbh

	If Found()

		Thisform.text6.Value=书名

		Thisform.text7.Value=作者

		Thisform.text8.Value=价格

		Thisform.Refresh

	Else

		Messagebox("图书编号错误！",48,"警告")

	Endif

Endif

2009-04-13 12:01:33

点赞只看TA 引用举报 #2得分 0

收起

收藏回复

macd43561

等级：

关注私信 TA的帖子

OPNET网络仿真--陈敏教授--2.5 包交换例程: 反反复复做了三天，最终第三次包交换例程出现仿真结果，如图所示：...因为书上使用的opnet 10.5而我使用的是opnet 14.5操作上还是多多少少有一点点差别，但是通过百度，这些问题都可解决，唯一不可解决的是，最后仿真结

【OPNET学习资料】OPNET资料整理，资源分享: 当初给自己挖了一个坑，选了OPNET来做毕设，网上的资料是真的少，特别是当你自己做一个工程出bug的时候，bug根本搜不到好嘛，在没有资料的情况下自己做是真的痛苦，资料都找不到的话连OPNET都用不熟。分享一些我这几...

OPNET-物联网仿真代码及软件使用: OPNET 物联网仿真这本书写的不错，有详细代码设计指导。建议同其它OPNET的操作书籍一起看。陈敏老师在书里说有代码，却不给链接，找的好辛苦，终于找到了。 http://epic.hust.edu.cn/minchen/opnet.htm 这个...

opnet14.5 tutorial翻译——包交换网络仿真: 参考文献：《opnet modeler网络建模与仿真》李馨西安电子科技大学出版社 ...《opnet网络仿真》陈敏清华大学出版社 14.5_modeler_tutorial_pdfs at http://en.pudn.com/downloads166/ebook/det

opnet 14.5的帮助文档打不开怎么办: 在opnet主页点击help菜单，选择tutorials，出现如下提示 ![图片说明](https://img-ask.csdn.net/upload/201704/18/1492528289_506875.png) 到底是哪里出了问题，请教各位大神，谢谢了（本人用的是64位win7系统）

opnet网络仿真(陈敏著) pdf版: opnet经典教材《 opnet网络仿真》陈敏著。是初学者学习opnet的必备书籍。深入浅出，是本好书

求陈敏老师所著的《OPNET物联网仿真》中的模型IOT_Simulation.rar，万分感谢！: 求陈敏老师所著的《OPNET物联网仿真》中的模型IOT_Simulation.rar，万分感谢！欢迎使用Markdown编辑器你好！这是你第一次使用 Markdown编辑器所展示的欢迎页。如果你想学习如何使用Markdown编辑器, 可以仔细阅读...

Opnet moduler学习过程的个人见解: 近来实验室承接了一个opnet的网络仿真的项目，从头开始一点点学习opnet这个过程中，有了一些关于opnet的自我的了解，这些都是我在网上查不到的内容，贴出来。 1、关于各种中断的中断码这个问题困扰了我很久，可以说...

opnet初探以及Packet Switching I实验过程中的若干问题的思考: 之前虽然经常听到opnet这个工具，但是de

opnet中仿真问题总结: opnet是一款功能很强大的软件，可以很好的模拟各种层面的网络行为（从小的协议分析到大范围的MANET）。其库文件中包含了当前多数已经标准化的网络协议，也支持用户自定义进程模型和节点模型。opnet属于商业软件，其...

成功完成opnet 14.5 + win7 64-bit +vs2008的安装，附包交换仿真出现的问题及解决方案: 本文是在win7 64位机器上的opnet实际安装结果。参考北邮论坛 1. 安装VS2008，安装个完整版你也不吃亏咯 2. 设置环境变量，参考北邮论坛 DevEnvDir C:\Program Files (x86)\Microsoft Visual Studio9.0\Common7\IDE...

opnet14.5+xp+vs2010: 最近需要学习使用OPNET14.5做仿真，就配置环境就折腾了h

opnet网络仿真教程（陈敏）: opnet网络仿真教程（陈敏）是一本国内专门介绍OPNET仿真的基础教材，内容十分详尽，适合初学者使用学习

opnet网络仿真 陈敏 pdf: 讲opnet的一本全面详细的书--《opnet网络仿真》作者陈敏 pdf

OPNET仿真陈敏教程第6章报错解决方法: 仿真了陈敏版本的第6章——包交换网络，一直报错，查了网上很多资料，提示要修改“Edit”下的“preference”中的“network simulation repositories”。一开始我是将里面的value改为“stdmod”，报错如下图： ...

OPNET仿真2.5节包交换例程无实验数据解决方案: 结果如下所示无结果数据（仿真例子依照基于5G通信与计算的物联网智能应用的2.5小节）排错一：重新了绘制周边节点模型包流的连接顺序会影响有没有ETE Delay的数据修改前的连接（这种是错误的）修改后的连接...

OPNET 14.5仿真实例: 该实例来源于书籍，《OPNET网络仿真》，陈敏，第六章。本实例内容为：OPNET三层建模。新建包格式->链路模型->节点模型->进程模型

opnet移动无线仿真网络: opnet14.5实现陈敏版OPNET网络仿真第九章的移动无线仿真网络

opnet教程【最新版】-陈敏: 一本很经典的网络仿真教程，讲述OPNET的基础教程。

OPNET 陈敏: 陈敏opnet书，很好、很经典的书！我个人就是用的这个书，经典！！！！！！！

OPNET仿真经典书籍: 网络仿真软件OPNET学习经典书籍 OPNET仿真软件功能强大，可以仿真有线网络和无线网络！天天向上

基于OPNET的无线传感器网络的仿真与建模: 基于OPNET的无线传感器网络的仿真与建模，本文以OPNET为工具，深入地讨论了仿真建模技术，全文的重点是网络协议的建模方法以及如何实现。在仿真系统提供的标准模型的基础上，实现对协议性能的分析，并在此基础上...

OPNET网络仿真（陈敏编著）: OPNET 是目前网络仿真工具中的很好的一个，但是由于操作复杂，使用者一般需要半年或以上时间的培训和自行研究才能熟练地掌握。针对这个问题，本书基于对OPNET 软件的研究，由浅入深地介绍了用其进行通信仿真系统建模...

基于OPNET的路由协议仿真教程（AODV、OLSR 、DSR等）: 主要参考资料：OPNET网络仿真(清华陈敏版) 仿真软件介绍：主流仿真软件如下： OPNET： OPNET是商业软件，所以界面非常好。功能上很强大，界面错落有致，统一严格。操作也很方便，对节点的修改主要就是对其...

OPNET 网络仿真.pdf: 陈敏的opnet 网络仿真 OPNET就是一个网络仿真技术软件包，它能够准确的分析复杂网络的性能和行为，在网络模型中的任意位置都可以插入标准的或用户指定的探头，以采集数据和进行统计。通过探头得到的仿真输出可以以...

OPNET学习资料总结: 收藏的一些opnet的学习资料，希望对初学者有所帮助

今天开始学opnet14.5: 所用的教材是陈敏的《OPNET网络仿真》，前面那些都是跳着看，明白了opnet原来是具有三层模型，接下来就是期待着地六章的到来“OPNET Modeler编程基础”。发现了她用的版本不是14.5，不过书都买了，尝试的学吧。发现...

opnet中包交换仿真的view results的问题: 最近开始接触opnet软件，打算做路由仿真，初始阶段主要参考陈敏教授的《opnet物联网仿真》一书，在2.5包交换仿真中出现比较头疼的问题就是程序已经编译通过了，但是在查看仿真结果的时候打开view results中看不到...

OPNET学习之路: OPNET 14.5 的安装安装过程借鉴该博主的很多，但是最后使用的是OPNET 11.5 破解的：安装过程学习这个就行了：https://blog.csdn.net/qq_31285709/article/details/87873709 当按照上面的过程安装到最后的时候，...

Visio_2016: visio_2016下载安装，亲测可用，不需要破解，而且无秘钥。简单方便实用

相关热词 c# 挂机锁 c# 不能再打开其它表了 c#移除行 c#socket建立通信 c# 拦截socket c#做一个问卷调查 c++结构体转换为c# c# 判断组合键 c# 的类重写dll c# 五层嵌套优化