VB贸易公司管理系统(ER图+功能模块图+源程序) 第5页
包括如图3－3中所示模块中：
图3－3 基本模块图
在代码设计时有一些代码在各个模块的设计中经常用到，在此称这些代码为公共代码。
在公共代码中各个模块中经常用到的方法和事件，这里在公共代码中用于绑定数据和定义的常用数据类型如下：
Dim mydata As Byte
Dim sconnstring As String = "data source= (local); initial catalog=pyj ; integrated security=sspi"
Dim mycn As New SqlConnection
Dim mysql As String = "select * from provider"
Dim mycommand As New SqlCommand(mysql, mycn)
Dim mydataadapter As New SqlDataAdapter
Dim mydataset As New DataSet
Dim mytable As New DataTable
Dim dataset As dataset = New dataset
Dim adt As SqlDataAdapter = New SqlDataAdapter("select * from provider", mycn)
在各个模块的查询窗口中，都要用到Click事件，具体的做法是在窗体中加入DataGrid控件，可以根据用户的输入值进行查询，这样将数据库中的相关信息显示在其中，如图3－4所示：
图3－4 查询窗口图
Click具体的操作代码如下：
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim mycon As New SqlConnection("data source=(local);initial catalog=pyj;integrated security=sspi")
Dim myadp As New SqlDataAdapter("select * from provider where " & ComboBox1.Text & " = '" & TextBox1.Text & " ' ", mycon)
If ComboBox1.Text = "" Then
MsgBox("请选择查询类型")
Exit Sub
www.751com.cn End If
If Not ds Is Nothing Then
DataGrid1.DataSource = ds.Tables("provider").DefaultView
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
在各个模块的编辑窗口中，同样也包含很多的公共代码，其中各个模块中最常用的是添加、修改、删除按钮，这里对这些按钮的代码就不一一介绍。
贸易公司管理系统的主界面是与用户直接对话的窗体，其中的各个控件实现了不同的功能，主要是点击其中的空间即可实现相应的功能。
主界面上ToolBar控件上设置的按钮，实现其功能的主要代码：
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case e.Button.Tag
Case "tbb1"
Dim myppfrm As New 供应商信息
myppfrm.MdiParent = Me
myppfrm.Show()
Case "tbb2"
Dim customerfrm As New 客户信息
customerfrm.MdiParent = Me
customerfrm.Show()
Case "tbb3"
Dim buyfrm As New 借贷银行信息
buyfrm.MdiParent = Me
buyfrm.Show()
Case "tbb4"
Dim salefrm As New 借贷销售信息
salefrm.MdiParent = Me
salefrm.Show()
End Select
End Sub
3.4 数据库设计
数据库在一个管理信息系统中占有非常重要的地位，数据结构设计的好坏将直接影响到系统的效率以及实现的效果。合理的数据库结构设计可以提高数据库存储效率，保证数据的完整性和一致性。设计数据库系统时应该首先充分了解系统需求以及将来可能增加的需求。
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] 下一页
VB贸易公司管理系统(ER图+功能模块图+源程序) 第5页下载如图片无法显示或论文不完整，请联系qq752018766
