《数据库课件第十一章 使用VB开发数据库程序》由会员分享,可在线阅读,更多相关《数据库课件第十一章 使用VB开发数据库程序(61页珍藏版)》请在金锄头文库上搜索。
1、第十一章 使用VB开发数据库程序,VB开发举例,进销存管理系统,一、分析需求,进销存管理系统,商品进库,商品出库,修改库存,查看库存,二、数据库设计数据流程,供应商,库存,销售商,数据项信息,供货商信息:供货商编码、名称、地址、税号、信誉度等 供货信息:供货时间、供货商名称、货品号、数量、负责人、供货单编号等 库存信息:货品号、数量、存放地点 客户信息:客户编号、名称、地址、信誉度 销售信息:销售时间、客户名称、货品号、数量、销售员、销售单编号等 员工信息:员功编号、姓名、密码、权限,建立ER模型(略),规范化,建立对应的表格,后台处理基本表供货商,基本表供货单,基本表供货单明细,基本表货品信
2、息,基本表库存信息,基本表员工信息,基本表客户信息,基本表销售单,基本表销售明细,表之间关系的建立,前台处理,第一步建立VB工程,创建标准Exe程序,第二步 将ADO控件加入的组件面板中,第三步 使用ADO组件链接Access,第四步 制作登录界面,1、将Adodc1的Visible熟悉设置为False 2、设置Adodc1的RecordSource属性,3、在窗体中放上两个Label控件、两个TextBox控件和一个CommandButton控件,对控件的属性进行设置,得到如下的界面:,4、双击按钮控件,加入如下列代码,Private Sub Command1_Click() If Text
3、1.Text = Then MsgBox 请输入员工号 Exit Sub End If If Text2.Text = Then MsgBox 请输入密码 Exit Sub End If Adodc1.RecordSource = select count(*) from 员工信息 where 员工编号= + + Text1.Text + and 密码= + + Text2.Text + ; Adodc1.Refresh If Adodc1.Recordset.Fields(0).Value = 0 Then MsgBox 用户名或密码错误,请重新输入 Else Form2.Show Unload Me End If End Sub,第五步 加入新窗体Form2作为系统的主窗体,设置Form窗体外观,1、添加窗体需要的菜单,2、美化Form2窗体加入背景图片,第六步、使用向导提高开发效率,1、将窗体向导加入菜单,2、使用ODBC连接数据库,创建用户DSN: 控制面板-管理工具-ODBC,3、利用向导创建货品管理窗体,4、添加主从式窗体入库单,后记,1、加入其他基本信息的管理窗体 2、加入查询库存信息的窗体 3、加入入库或出库后更改库存信息的程序 4、完善程序和美化程序 。,