基于VB程序数据库查询系统的设计与实现--《计算机与现代化》1998年02期
基于VB程序数据库查询系统的设计与实现
【摘要】：数据库通用查询系统是开发MIS系统和数据库管理应用系统中一个重要的问题。其主要的问题是如何方便地建立查询方式以及对任意条件进行查询，并且具有模糊查询功能。本文就此问题介绍一种用VB编程来实现的数据库查询系统，并给出主要程序清单。
【作者单位】：
【分类号】：TP311.13
欢迎：、、)
支持CAJ、PDF文件格式，仅支持PDF格式
【引证文献】
中国硕士学位论文全文数据库
张文鑫;[D];哈尔滨工程大学;2003年
林海英;[D];哈尔滨工程大学;2003年
刘华丽;[D];北京林业大学;2005年
夏玉杰;[D];哈尔滨工程大学;2004年
丁立文;[D];哈尔滨工程大学;2007年
【参考文献】
中国期刊全文数据库
张付志;韩卫;;[J];软件;1995年06期
【共引文献】
中国硕士学位论文全文数据库
杨永宽;[D];电子科技大学;2010年
【同被引文献】
中国期刊全文数据库
赵伟,罗芸,张长青,丁永官,郭高,李毅;[J];安徽农业科学;2003年03期
赵方,李晓珊;[J];商业研究;2000年09期
张鹏;[J];标准化报道;2000年02期
袁灼萍;[J];标准化报道;1995年01期
黄胜华;[J];标准化报道;1995年05期
孟令奎，边馥苓;[J];测绘通报;1996年04期
袁国伟,谢素玲;[J];材料保护;2001年07期
彭程,何红波;[J];地矿测绘;2002年01期
孔繁钢,王国栋,王强;[J];电力情报;2000年04期
陈述彭,何建邦,承继成;[J];地球信息;1997年03期
【二级引证文献】
中国期刊全文数据库
肖蓓;湛邵斌;尹楠;;[J];地理空间信息;2007年05期
中国博士学位论文全文数据库
白降丽;[D];北京林业大学;2007年
中国硕士学位论文全文数据库
冯庆胜;[D];大连交通大学;2006年
王萍萍;[D];华北电力大学（北京）;2007年
胡翔;[D];西南交通大学;2007年
潘杰宇;[D];中南大学;2008年
司冠南;[D];山东大学;2008年
王政;[D];山东科技大学;2008年
王超;[D];华中科技大学;2007年
杨聪聪;[D];西安电子科技大学;2012年
【相似文献】
中国期刊全文数据库
闵华清,陈国平,赵世平;[J];计算机与现代化;1998年02期
黄丽;孙敏燕;;[J];科技信息(科学教研);2008年14期
吕彩霞;;[J];吉林教育;2010年01期
李宝林;;[J];内蒙古科技与经济;2011年05期
李新南;;[J];知识经济;2011年14期
莫林利;;[J];科技广场;2006年02期
期俊玲;;[J];红河学院学报;2007年02期
宋荣杰;魏蕾;;[J];电脑知识与技术(学术交流);2007年11期
吴征;;[J];内江科技;2007年08期
杨丽;;[J];科技信息(学术研究);2007年36期
中国重要会议论文全文数据库
阳爱民;孙星明;李长云;;[A];第十八届全国数据库学术会议论文集（研究报告篇）[C];2001年
夏梦丽;王文卿;潘振祥;;[A];河南地球科学通报2009年卷（下册）[C];2009年
杨德娟;汪丽萍;;[A];医改新政下护理改革之路系列研讨会（三）护理管理改革创新高层论坛论文集[C];2010年
黄冬梅;张健;;[A];第十九届全国数据库学术会议论文集（技术报告篇）[C];2002年
王静;杜小勇;王珊;;[A];第十七届全国数据库学术会议论文集（研究报告篇）[C];2000年
叶良;左广斌;;[A];第十一届全国煤矿自动化学术年会论文专辑[C];2001年
周君毅;刘嘉峰;邱嗣荣;毛勇锋;许耀华;;[A];第十八届全国数据库学术会议论文集（技术报告篇）[C];2001年
刘敬东;罗继先;;[A];吉林省测绘学会2008年学术年会论文集（下）[C];2008年
耿少辉;;[A];第三届广西青年学术年会论文集（自然科学篇）[C];2004年
茹戈华;石树刚;郑振楣;;[A];第十一届全国数据库学术会议论文集[C];1993年
中国重要报纸全文数据库
胡晓峰;[N];中国船舶报;2007年
谢佳?何贤方
张晶;[N];人民公安报;2007年
何勇;[N];商洛日报;2007年
李洪华;[N];中国税务报;2008年
孙伟;[N];云南日报;2006年
韩红京;[N];中国石化报;2008年
王建强;[N];阿克苏日报;2008年
张涛?通讯员
徐丽勇;[N];丽水日报;2008年
李轩甫;[N];检察日报;2005年
蒋才虎;[N];南方日报;2006年
中国博士学位论文全文数据库
陈靖宇;[D];中国协和医科大学;1997年
陆真;[D];南京师范大学;2007年
向桂林;[D];中国科学院研究生院（文献情报中心）;2004年
王晓辉;[D];西安理工大学;2006年
王一川;[D];北京邮电大学;2011年
黄逸民;[D];浙江大学;2002年
钱卫宁;[D];复旦大学;2004年
高占凤;[D];北京交通大学;2010年
庞引明;[D];复旦大学;2004年
中国硕士学位论文全文数据库
张裕君;[D];华中农业大学;2003年
戴水平;[D];湖南中医学院;2004年
赵赟;[D];东南大学;2004年
王兆霞;[D];东华大学;2011年
刘建芬;[D];中国地质大学（北京）;2007年
马巧梅;[D];华北工学院;2003年
姜强;[D];西南师范大学;2004年
陈静;[D];中国地质大学（北京）;2006年
姚一永;[D];四川大学;2004年
陈勇;[D];中国海洋大学;2005年
&快捷付款方式
&订购知网充值卡
400-819-9993查看: 4688|回复: 13
一个小MIS系统，对初学者有用
《物品借还记录系统》是春节期间的作品，该作品的诞生原因一是同事需要，二是春节没回家，本人也没其他爱好太无聊，以敲键盘为乐吧。突然感觉有个业余爱好真的很幸福。
& & & & 书归正传，该系统由VB6+ACCESS2003构建
& & & & 系统默认用户为admin 登录密码为 denglu.1234 进入系统后可以自己修改密码，admin角色不参与业务，只有添加删除修改用户的功能唯独不能删除自己。
& & & & 系统的业务功能主要分为：
& & & & 1、主文档设置，包括员工信息维护、物品信息维护。该功能是将主文档信息录入系统并进行维护；
& & & & 2、物品借还，包括借物品、还物品。借物品业务为记录员工借物品的相关信息：员工姓名、部门名称、物品类型、物品单位、物品型号、物品序列号、借数量、备注、借物品记录人、记录时间。记录过程多为在主文档信息中进行选择，避免了录入过程中的错误。还物品功能为记录员工还物品的相关信息，信息如上增加了还物品记录人、记录时间，在还物品的功能中增加了查询功能，可根据部门名称、员工姓名、物品名称进行模糊查询，方便找到员工借物品的历史记录从而进行还物品记录。太罗嗦了。
& & & & 3、修改密码，可根据此功能修改个人密码。
& & & & 介绍完毕，如有BUG请通知我。
& & & & 如果有更好的需求请邮件通知我，有时间继续开发。
& && && & 我的邮箱:
& && && & 源代码写的比较乱，也是想到哪写到哪，望见谅。
哎呀，忘记说了，有些功能是在数据库里实现的。有若干视图在ACCESS里，想学习数据库开发的兄弟姐妹们可以安装ACCESS打开看看。
已经发现了若干BUG
[ 本帖最后由 yyhust 于
11:11 编辑 ]
15:58 上传
点击文件名下载附件
198.7 KB, 下载次数: 585
物品借还记录系统.zip
谢谢LZ,新年快乐!
顶一下，初学者的可以下载看看。
适合我，谢谢前辈
头像被屏蔽
提示: 作者被禁止或删除 内容自动屏蔽
顶一下，初学者的可以下载看看。
谢谢楼主分享
登录后不出现其它菜单。
不能使用，是不是我少了什么？
我下载下来，学习下谢谢楼主！！！
请问“还数量”一个的功能不能用，为什么？&>&管理信息系统的例子（vb+access）
管理信息系统的例子（vb+access）
上传大小：286KB
功能全面，登陆、连接数据库、简单查询、管理者查询、录入、修改密码、添加用户、用户权限等等都贡献出来了。本来是个课题，可惜半路夭折......有兴趣的发挥一下，说不定又活起来的！ 运行程序时，需要登陆。 登陆用户名yyb 密码333 还有两个用户，我没有加密数据库，请自行在源程序数据库用户表中查找。
综合评分：0
{%username%}回复{%com_username%}{%time%}\
/*点击出现回复框*/
$(".respond_btn").on("click", function (e) {
$(this).parents(".rightLi").children(".respond_box").show();
e.stopPropagation();
$(".cancel_res").on("click", function (e) {
$(this).parents(".res_b").siblings(".res_area").val("");
$(this).parents(".respond_box").hide();
e.stopPropagation();
/*删除评论*/
$(".del_comment_c").on("click", function (e) {
var id = $(e.target).attr("id");
$.getJSON('/index.php/comment/do_invalid/' + id,
function (data) {
if (data.succ == 1) {
$(e.target).parents(".conLi").remove();
alert(data.msg);
$(".res_btn").click(function (e) {
var parentWrap = $(this).parents(".respond_box"),
q = parentWrap.find(".form1").serializeArray(),
resStr = $.trim(parentWrap.find(".res_area_r").val());
console.log(q);
//var res_area_r = $.trim($(".res_area_r").val());
if (resStr == '') {
$(".res_text").css({color: "red"});
$.post("/index.php/comment/do_comment_reply/", q,
function (data) {
if (data.succ == 1) {
var $target,
evt = e || window.
$target = $(evt.target || evt.srcElement);
var $dd = $target.parents('dd');
var $wrapReply = $dd.find('.respond_box');
console.log($wrapReply);
//var mess = $(".res_area_r").val();
var mess = resS
var str = str.replace(/{%header%}/g, data.header)
.replace(/{%href%}/g, 'http://' + window.location.host + '/user/' + data.username)
.replace(/{%username%}/g, data.username)
.replace(/{%com_username%}/g, data.com_username)
.replace(/{%time%}/g, data.time)
.replace(/{%id%}/g, data.id)
.replace(/{%mess%}/g, mess);
$dd.after(str);
$(".respond_box").hide();
$(".res_area_r").val("");
$(".res_area").val("");
$wrapReply.hide();
alert(data.msg);
}, "json");
/*删除回复*/
$(".rightLi").on("click", '.del_comment_r', function (e) {
var id = $(e.target).attr("id");
$.getJSON('/index.php/comment/do_comment_del/' + id,
function (data) {
if (data.succ == 1) {
$(e.target).parent().parent().parent().parent().parent().remove();
$(e.target).parents('.res_list').remove()
alert(data.msg);
//填充回复
function KeyP(v) {
var parentWrap = $(v).parents(".respond_box");
parentWrap.find(".res_area_r").val($.trim(parentWrap.find(".res_area").val()));
评论共有0条
ddt3484710
综合评分：
积分/C币：3
crastalsxq
综合评分：
积分/C币：3
VIP会员动态
CSDN下载频道资源及相关规则调整公告V11.10
下载频道用户反馈专区
下载频道积分规则调整V1710.18
spring mvc+mybatis+mysql+maven+bootstrap 整合实现增删查改简单实例.zip
资源所需积分/C币
当前拥有积分
当前拥有C币
输入下载码
为了良好体验，不建议使用迅雷下载
管理信息系统的例子（vb+access）
会员到期时间：
剩余下载个数：
剩余积分：0
为了良好体验，不建议使用迅雷下载
积分不足！
资源所需积分/C币
当前拥有积分
您可以选择
程序员的必选
绿色安全资源
资源所需积分/C币
当前拥有积分
当前拥有C币
为了良好体验，不建议使用迅雷下载
资源所需积分/C币
当前拥有积分
当前拥有C币
为了良好体验，不建议使用迅雷下载
资源所需积分/C币
当前拥有积分
当前拥有C币
您的积分不足，将扣除 10 C币
为了良好体验，不建议使用迅雷下载
无法举报自己的资源
你当前的下载分为234。
你还不是VIP会员
开通VIP会员权限，免积分下载
你下载资源过于频繁，请输入验证码
您因违反CSDN下载频道规则而被锁定帐户，如有疑问，请联络:!
若举报审核通过，可返还被扣除的积分
被举报人：
举报的资源分：
请选择类型
资源无法下载 （ 404页面、下载失败、资源本身问题）
资源无法使用 （文件损坏、内容缺失、题文不符）
侵犯版权资源 （侵犯公司或个人版权）
虚假资源 （恶意欺诈、刷分资源）
含色情、危害国家安全内容
含广告、木马病毒资源
*详细原因：
管理信息系统的例子（vb+access）用VB设计图书管理系统_百度文库
赠送免券下载特权
10W篇文档免费专享
部分付费文档8折起
每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
用VB设计图书管理系统
阅读已结束，下载本文需要
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，同时保存到云知识，更方便管理
加入VIP
还剩43页未读，
定制HR最喜欢的简历
你可能喜欢vb如何制作界面切换动画_百度知道
vb如何制作界面切换动画
我用vb写了一个程序，界面也还好，就是能不能加入一些界面切换动画啊？？
我是这样想的:在主窗体上点击了一下，这个窗体就会翻转，像一张纸翻过来，然后就像显示窗体背面的内容。
差不多就是要把窗口变成梯形，然后宽度也来越小，接着再宽度越来越大，显示新的...
我有更好的答案
1999年的时候我也这么做过，可惜失败了。
原因1：VB的动画执行效率不够，直接的说就是速度慢；
原因2：不实用；
再往深里说，就算做出来了，区区一个界面就占用了庞大的程序量，以后的调试和维护成本都会翻翻的增加，而且，过于华丽的界面会严重影响程序的兼容性。
如果你想把界面做的漂亮，像游戏那么漂亮，请用DirectX和VC，VB不适合。
如果只是用VB做MIS，实用性、操作简便、稳定性都是最重要的，界面不在于华丽，而在于简洁！
我还是试试吧，至少现在电脑比以前强多了。所以请说一下把一张图片拉成梯形的代码，谢谢啦
算法部分还是有点程序量的，我的闲暇时间不够写完善的代码，临时写个简单的给你参考吧（严格的说这还算不上梯形），主要是介绍一下思路，另外你也可以留意一下它的执行速度。Dim nBL_X As SingleDim nBL_Y As SinglePrivate Sub Cmd_OK_Click()&&&&Dim X_Src As Single, Y_Src As Single&&&&Dim X_Des As Single, Y_Des As Single&&&&Dim iColor As Long&&&&&&&&&&&&&&&&&&&&&nBL_X = 1&&&&nBL_Y = 0.5&&&&&&&&&&&&&&&&&&&&&Set Pic_Des.Picture = Nothing&&&&Pic_Des.Cls&&&&&&&&&&&&&&&&&&&&&With Pic_Src&&&&&&&&For Y_Src = .ScaleHeight - 1 To 0 Step -1&&&&&&&&&&&&Y_Des = Y_Src * nBL_Y&&&&&&&&&&&&Y_Des = Y_Des + (.ScaleHeight * (1 - nBL_Y)) / 2&&&&&&&&&&&&nBL_X = nBL_X * 0.999&&&&&&&&&&&&For X_Src = 0 To .ScaleWidth - 1&&&&&&&&&&&&&&&&iColor = .Point(X_Src, Y_Src)&&&&&&&&&&&&&&&&X_Des = X_Src * nBL_X&&&&&&&&&&&&&&&&X_Des = X_Des + (.ScaleWidth * (1 - nBL_X)) / 2&&&&&&&&&&&&&&&&Pic_Des.PSet (X_Des, Y_Des), iColor&&&&&&&&&&&&Next X_Src&&&&&&&&&&&&DoEvents&&&&&&&&Next Y_Src&&&&End WithEnd Sub执行效果：
采纳率：64%
为您推荐：
其他类似问题
您可能关注的内容
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。