标题:[分享] vb.net做的一套简单的图书管理系统原代码!适合菜鸟学习用
只看楼主
Viviwei
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:344
专家分:0
注 册:2006-4-11
 问题点数:0 回复次数:118 
[分享] vb.net做的一套简单的图书管理系统原代码!适合菜鸟学习用


使用需知


因为时间仓促,所以没全面的去完成其中间所有功能。
数据库也不是很完善,因为鉴于菜鸟的学习,没用用类去处理相关的数据库连接。请见谅!
此系统仅用于菜鸟的学习。使用时请先附加数据库。
用于参考者请用vb.net将源程序打开后观看,实现了基本的添加,修改,删除.首记录,上记录.下记录,尾记录,以及图书的借阅,图书的查询.
如果是从网络上下载后得到的请在论坛给我留言或者QQ:85474440联系我给我好的建议。
如有需求要完整的系统者(经规范的编写),请联系本人。
谢谢您的使用

更改后的系统给大家下载参考.请需要者QQ联系我,加好友时注明是编程论坛的成员!~

EnbXzrWT.rar (620.6 KB) [分享] 一套简单的图书管理系统!含原代码!适合菜鸟学习用


[此贴子已经被作者于2006-5-16 8:30:42编辑过]



6o2sUV4F.rar (340.71 KB) [分享]刚刚做的图书管理系统!



ohouablt.rar (411.03 KB) [分享] 一套简单的图书管理系统!含原代码!适合菜鸟学习用

搜索更多相关主题的帖子: 图书管理系统 代码 分享 学习 
2006-04-25 13:49
wugong
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2005-8-1
得分:0 

什么是闪窗?

2006-04-26 14:18
Viviwei
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:344
专家分:0
注 册:2006-4-11
得分:0 

就是在进入系统前的一个临时窗体!~
关键在于给用户一个提示信息!~表示正在进入 系统
我靠,这么多人下了怎么都不回贴啊!~


爱上思考,爱上编程,爱上.net!
2006-04-27 18:08
Viviwei
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:344
专家分:0
注 册:2006-4-11
得分:0 
闪窗的问题已经解决,大家想看的请去看

爱上思考,爱上编程,爱上.net!
2006-04-27 19:37
regedit
Rank: 5Rank: 5
等 级:贵宾
威 望:19
帖 子:950
专家分:0
注 册:2004-6-8
得分:0 
dim flashform as new flashform '显示加载信息的窗体
application.run(flashform)
dim Mainform as new Mainform  '主窗体
application.run(Mainform)

最新作品:百货品牌商品资讯第一门户([url]http://www./[/url]),欢迎交流
2006-04-28 00:03
Viviwei
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:344
专家分:0
注 册:2006-4-11
得分:0 
谢谢回答,我去试试这个方法看

爱上思考,爱上编程,爱上.net!
2006-04-28 09:06
Viviwei
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:344
专家分:0
注 册:2006-4-11
得分:0 
好象不可以也,能无限的循环了

爱上思考,爱上编程,爱上.net!
2006-04-28 09:12
Viviwei
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:344
专家分:0
注 册:2006-4-11
得分:0 
Dim int As Integer = 0
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
dim frm as new from2
If int = 0 Then
Me.Visible = True
frm.Visible = False
int = 1
ElseIf int = 1 Then
Me.Visible = False
frm.Visible = Ture
int = 2
End If
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Show()
Me.Timer1.Enabled = True
Me.Timer1.Interval = 1000 '时间间隔自定义
End Sub
这个可以,成功使用了


爱上思考,爱上编程,爱上.net!
2006-04-28 09:13
regedit
Rank: 5Rank: 5
等 级:贵宾
威 望:19
帖 子:950
专家分:0
注 册:2004-6-8
得分:0 
呵呵~2秒后加载...

最新作品:百货品牌商品资讯第一门户([url]http://www./[/url]),欢迎交流
2006-04-28 22:50
sanitspare
Rank: 1
等 级:新手上路
帖 子:57
专家分:0
注 册:2005-5-4
得分:0 
其实这个加载信息窗口只不过是因为主程序启动缓慢,为了让用户感觉不到这一点而故意设置的,这个窗体做的小一点,先show(),然后主窗体show(),信息窗体close()就可以了,好像是哪本书上看到过的,忘了

2006-04-30 23:19



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-60010-1-1.html




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

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