以下是网学网为您推荐的VB类作品-基于VB的XX公司物资信息管理系统，希望本篇文章对您学习有所帮助。
4：查询仓库入库信息 选择“仓库入库信息管理查询仓库仓库入库信息“菜单，将出现所示的窗体。在这里可以按照各种方式以及它们的组合进行查询。 载入窗体时，将自动加入所有记录的入库时间，代码如下： Private Sub Form_Load() sQSql = "" Dim i As Integer Dim j As Integer Dim sSql As String Dim txtSQL As String Dim MsgText As String Dim mrc As ADODB.Recordset txtSQL = "select distinct datepart(yy,rkdate) from msave" Set mrc = ExecuteSQL(txtSQL, MsgText) If mrc.EOF = False Then With mrc Do While Not .EOF cboYear(0).AddItem .Fields(0) cboYear(1).AddItem .Fields(0) .MoveNext Loop End With For i = 0 To 1 cboYear(i).ListIndex = 0 Next i For i = 0 To 1 For j = 1 To 12 cboMonth(i).AddItem j Next j Next i For i = 0 To 1 cboMonth(i).Text = Month(Now()) Next i Else cmdOk.Enabled = False End If mrc.Close End Sub 查询的方法和查询仓库基本信息的方法一样。 4．7 仓库出库管理模块的创建 仓库出库管理模块主要实现如下功能： ● 添加仓库出库信息。 ● 修改仓库出库信息。 ● 删除仓库出库信息。 ● 查询仓库出库信息。 1:添加仓库出库信息窗体的创建 选择“仓库出库信息管理|添加仓库出库信息“菜单，将出现如图所示的窗体。 
|
| 本站发布的计算机毕业设计均是完整无错的全套作品，包含开题报告+程序+论文+源代码+翻译+答辩稿PPT |
本文选自计算机毕业设计http://myeducs.cn
|
