main.vb

本软件设计为在"采购部""工程部""财务部""总经理"等部门之间的采购审核流转等事宜

        '
        Me.MenuItem101.Index = 1
        Me.MenuItem101.Text = "业主信息查询"
        '
        'MenuItem102
        '
        Me.MenuItem102.Index = 2
        Me.MenuItem102.Text = "工程材料信息查询"
        '
        'MenuItem103
        '
        Me.MenuItem103.Index = 3
        Me.MenuItem103.Text = "银行信息查询"
        '
        'MenuItem38
        '
        Me.MenuItem38.Index = 3
        Me.MenuItem38.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem104, Me.MenuItem105, Me.MenuItem106, Me.MenuItem107})
        Me.MenuItem38.Text = "项目部经理查询"
        '
        'MenuItem104
        '
        Me.MenuItem104.Index = 0
        Me.MenuItem104.Text = "工程信息查询"
        '
        'MenuItem105
        '
        Me.MenuItem105.Index = 1
        Me.MenuItem105.Text = "业主信息查询"
        '
        'MenuItem106
        '
        Me.MenuItem106.Index = 2
        Me.MenuItem106.Text = "工程材料信息查询"
        '
        'MenuItem107
        '
        Me.MenuItem107.Index = 3
        Me.MenuItem107.Text = "银行信息查询"
        '
        'MenuItem42
        '
        Me.MenuItem42.Index = 4
        Me.MenuItem42.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem86, Me.MenuItem87, Me.MenuItem88, Me.MenuItem89})
        Me.MenuItem42.Text = "总经理查询"
        '
        'MenuItem86
        '
        Me.MenuItem86.Index = 0
        Me.MenuItem86.Text = "工程信息查询"
        '
        'MenuItem87
        '
        Me.MenuItem87.Index = 1
        Me.MenuItem87.Text = "业主信息查询"
        '
        'MenuItem88
        '
        Me.MenuItem88.Index = 2
        Me.MenuItem88.Text = "工程材料信息查询"
        '
        'MenuItem89
        '
        Me.MenuItem89.Index = 3
        Me.MenuItem89.Text = "银行信息查询"
        '
        'MenuItem90
        '
        Me.MenuItem90.Index = 5
        Me.MenuItem90.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem111, Me.MenuItem108, Me.MenuItem109, Me.MenuItem110})
        Me.MenuItem90.Text = "分公司经理查询"
        '
        'MenuItem111
        '
        Me.MenuItem111.Index = 0
        Me.MenuItem111.Text = "工程信息查询"
        '
        'MenuItem108
        '
        Me.MenuItem108.Index = 1
        Me.MenuItem108.Text = "业主信息查询"
        '
        'MenuItem109
        '
        Me.MenuItem109.Index = 2
        Me.MenuItem109.Text = "工程材料信息查询"
        '
        'MenuItem110
        '
        Me.MenuItem110.Index = 3
        Me.MenuItem110.Text = "银行信息查询"
        '
        'MenuItem40
        '
        Me.MenuItem40.Index = 6
        Me.MenuItem40.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem112, Me.MenuItem113, Me.MenuItem114, Me.MenuItem115})
        Me.MenuItem40.Text = "财务经理查询"
        '
        'MenuItem112
        '
        Me.MenuItem112.Index = 0
        Me.MenuItem112.Text = "工程信息查询"
        '
        'MenuItem113
        '
        Me.MenuItem113.Index = 1
        Me.MenuItem113.Text = "业主信息查询"
        '
        'MenuItem114
        '
        Me.MenuItem114.Index = 2
        Me.MenuItem114.Text = "工程材料信息查询"
        '
        'MenuItem115
        '
        Me.MenuItem115.Index = 3
        Me.MenuItem115.Text = "银行信息查询"
        '
        'MenuItem65
        '
        Me.MenuItem65.Index = 7
        Me.MenuItem65.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem66, Me.MenuItem75})
        Me.MenuItem65.Text = "帮助"
        '
        'MenuItem66
        '
        Me.MenuItem66.Index = 0
        Me.MenuItem66.Text = "如何使用"
        '
        'MenuItem75
        '
        Me.MenuItem75.Index = 1
        Me.MenuItem75.Text = "发E_mail给我"
        '
        'menuEngageOrder
        '
        Me.menuEngageOrder.Index = -1
        Me.menuEngageOrder.Text = ""
        '
        'menuEngageSvc
        '
        Me.menuEngageSvc.Index = -1
        Me.menuEngageSvc.Text = ""
        '
        'menuExpandOrder
        '
        Me.menuExpandOrder.Index = -1
        Me.menuExpandOrder.Text = ""
        '
        'MenuItem8
        '
        Me.MenuItem8.Index = -1
        Me.MenuItem8.Text = ""
        '
        'MenuItem9
        '
        Me.MenuItem9.Index = -1
        Me.MenuItem9.Text = "入库管理"
        '
        'menuTransSvc
        '
        Me.menuTransSvc.Index = -1
        Me.menuTransSvc.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem10, Me.MenuItem11})
        Me.menuTransSvc.Text = "出库"
        '
        'MenuItem10
        '
        Me.MenuItem10.Index = 0
        Me.MenuItem10.Text = "编辑出库单"
        '
        'MenuItem11
        '
        Me.MenuItem11.Index = 1
        Me.MenuItem11.Text = "出库管理"
        '
        'MenuItem12
        '
        Me.MenuItem12.Index = -1
        Me.MenuItem12.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem13, Me.MenuItem14})
        Me.MenuItem12.Text = "库存盘点"
        '
        'MenuItem13
        '
        Me.MenuItem13.Index = 0
        Me.MenuItem13.Text = "编辑盘点信息"
        '
        'MenuItem14
        '
        Me.MenuItem14.Index = 1
        Me.MenuItem14.Text = "库存盘点管理"
        '
        'ToolBar1
        '
        Me.ToolBar1.Appearance = System.Windows.Forms.ToolBarAppearance.Flat
        Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton1, Me.ToolBarButton2, Me.ToolBarButton3, Me.ToolBarButton4, Me.ToolBarButton5, Me.ToolBarButton6, Me.ToolBarButton7, Me.ToolBarButton8, Me.ToolBarButton9, Me.ToolBarButton10, Me.ToolBarButton11})
        Me.ToolBar1.DropDownArrows = True
        Me.ToolBar1.ImageList = Me.ImageList1
        Me.ToolBar1.Location = New System.Drawing.Point(0, 0)
        Me.ToolBar1.Name = "ToolBar1"
        Me.ToolBar1.ShowToolTips = True
        Me.ToolBar1.Size = New System.Drawing.Size(654, 30)
        Me.ToolBar1.TabIndex = 0
        '
        'ToolBarButton1
        '
        Me.ToolBarButton1.Pushed = True
        Me.ToolBarButton1.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
        '
        'ToolBarButton2
        '
        Me.ToolBarButton2.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
        '
        'ToolBarButton3
        '
        Me.ToolBarButton3.ImageIndex = 16
        Me.ToolBarButton3.ToolTipText = "修改密码"
        '
        'ToolBarButton4
        '
        Me.ToolBarButton4.ImageIndex = 4
        Me.ToolBarButton4.ToolTipText = "工程信息查询"
        '
        'ToolBarButton5
        '
        Me.ToolBarButton5.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
        Me.ToolBarButton5.ToolTipText = "业主信息查询"
        '
        'ToolBarButton6
        '
        Me.ToolBarButton6.ImageIndex = 5
        Me.ToolBarButton6.ToolTipText = "业主信息查询"
        '
        'ToolBarButton7
        '
        Me.ToolBarButton7.ImageIndex = 8
        Me.ToolBarButton7.ToolTipText = "银行信息查询"
        '
        'ToolBarButton8
        '
        Me.ToolBarButton8.ImageIndex = 9
        Me.ToolBarButton8.ToolTipText = "帮助"
        '
        'ToolBarButton9
        '
        Me.ToolBarButton9.ImageIndex = 0
        '
        'ToolBarButton10
        '
        Me.ToolBarButton10.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
        Me.ToolBarButton10.ToolTipText = "发E_mail给我"
        '
        'ToolBarButton11
        '
        Me.ToolBarButton11.ImageIndex = 14
        Me.ToolBarButton11.ToolTipText = "退出"
        '
        'ImageList1
        '
        Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth16Bit
        Me.ImageList1.ImageSize = New System.Drawing.Size(18, 18)
        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
        '
        'StatusBar1
        '
        Me.StatusBar1.Location = New System.Drawing.Point(0, 383)
        Me.StatusBar1.Name = "StatusBar1"
        Me.StatusBar1.Panels.AddRange(New System.Windows.Forms.StatusBarPanel() {Me.StatusBarPanel1, Me.StatusBarPanel2, Me.StatusBarPanel3, Me.StatusBarPanel4})
        Me.StatusBar1.ShowPanels = True
        Me.StatusBar1.Size = New System.Drawing.Size(654, 22)
        Me.StatusBar1.TabIndex = 1
        Me.StatusBar1.Text = "StatusBar1"
        '
        'StatusBarPanel1
        '
        Me.StatusBarPanel1.AutoSize = System.Windows.Forms.StatusBarPanelAutoSize.Spring
        Me.StatusBarPanel1.Text = "  南京百科工程公司"
        Me.StatusBarPanel1.Width = 338
        '
        'StatusBarPanel2
        '
        Me.StatusBarPanel2.Text = "采购软件V1.0"
        '
        'StatusBarPanel3
        '
        Me.StatusBarPanel3.Text = "操作人"
        '
        'StatusBarPanel4
        '
        Me.StatusBarPanel4.Alignment = System.Windows.Forms.HorizontalAlignment.Center
        Me.StatusBarPanel4.Text = "时间"
        '
        'Panel1
        '
        Me.Panel1.Controls.Add(Me.Button1)
        Me.Panel1.Controls.Add(Me.Label1)
        Me.Panel1.Controls.Add(Me.TreeView1)
        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Left
        Me.Panel1.Location = New System.Drawing.Point(0, 30)
        Me.Panel1.Name = "Panel1"
        Me.Panel1.Size = New System.Drawing.Size(220, 353)
        Me.Panel1.TabIndex = 3
        Me.Panel1.Visible = False
        '
        'Button1
        '
        Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Popup
        Me.Button1.ImageIndex = 2
        Me.Button1.ImageList = Me.ImageList1
        Me.Button1.Location = New System.Drawing.Point(196, 0)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(24, 24)
        Me.Button1.TabIndex = 1
        Me.Button1.Visible = False
        '
        'Label1
        '
        Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)