main.vb

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

        Me.MenuItem38 = New System.Windows.Forms.MenuItem
        Me.MenuItem104 = New System.Windows.Forms.MenuItem
        Me.MenuItem105 = New System.Windows.Forms.MenuItem
        Me.MenuItem106 = New System.Windows.Forms.MenuItem
        Me.MenuItem107 = New System.Windows.Forms.MenuItem
        Me.MenuItem42 = New System.Windows.Forms.MenuItem
        Me.MenuItem86 = New System.Windows.Forms.MenuItem
        Me.MenuItem87 = New System.Windows.Forms.MenuItem
        Me.MenuItem88 = New System.Windows.Forms.MenuItem
        Me.MenuItem89 = New System.Windows.Forms.MenuItem
        Me.MenuItem90 = New System.Windows.Forms.MenuItem
        Me.MenuItem111 = New System.Windows.Forms.MenuItem
        Me.MenuItem108 = New System.Windows.Forms.MenuItem
        Me.MenuItem109 = New System.Windows.Forms.MenuItem
        Me.MenuItem110 = New System.Windows.Forms.MenuItem
        Me.MenuItem40 = New System.Windows.Forms.MenuItem
        Me.MenuItem112 = New System.Windows.Forms.MenuItem
        Me.MenuItem113 = New System.Windows.Forms.MenuItem
        Me.MenuItem114 = New System.Windows.Forms.MenuItem
        Me.MenuItem115 = New System.Windows.Forms.MenuItem
        Me.MenuItem65 = New System.Windows.Forms.MenuItem
        Me.MenuItem66 = New System.Windows.Forms.MenuItem
        Me.MenuItem75 = New System.Windows.Forms.MenuItem
        Me.menuEngageOrder = New System.Windows.Forms.MenuItem
        Me.menuEngageSvc = New System.Windows.Forms.MenuItem
        Me.menuExpandOrder = New System.Windows.Forms.MenuItem
        Me.MenuItem8 = New System.Windows.Forms.MenuItem
        Me.MenuItem9 = New System.Windows.Forms.MenuItem
        Me.menuTransSvc = New System.Windows.Forms.MenuItem
        Me.MenuItem10 = New System.Windows.Forms.MenuItem
        Me.MenuItem11 = New System.Windows.Forms.MenuItem
        Me.MenuItem12 = New System.Windows.Forms.MenuItem
        Me.MenuItem13 = New System.Windows.Forms.MenuItem
        Me.MenuItem14 = New System.Windows.Forms.MenuItem
        Me.ToolBar1 = New System.Windows.Forms.ToolBar
        Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton2 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton3 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton4 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton5 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton6 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton7 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton8 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton9 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton10 = New System.Windows.Forms.ToolBarButton
        Me.ToolBarButton11 = New System.Windows.Forms.ToolBarButton
        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
        Me.StatusBar1 = New System.Windows.Forms.StatusBar
        Me.StatusBarPanel1 = New System.Windows.Forms.StatusBarPanel
        Me.StatusBarPanel2 = New System.Windows.Forms.StatusBarPanel
        Me.StatusBarPanel3 = New System.Windows.Forms.StatusBarPanel
        Me.StatusBarPanel4 = New System.Windows.Forms.StatusBarPanel
        Me.Panel1 = New System.Windows.Forms.Panel
        Me.Button1 = New System.Windows.Forms.Button
        Me.Label1 = New System.Windows.Forms.Label
        Me.TreeView1 = New System.Windows.Forms.TreeView
        Me.Splitter1 = New System.Windows.Forms.Splitter
        Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
        Me.Timer2 = New System.Windows.Forms.Timer(Me.components)
        Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
        Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
        Me.ContextMenu1 = New System.Windows.Forms.ContextMenu
        Me.MenuItem16 = New System.Windows.Forms.MenuItem
        Me.MenuItem17 = New System.Windows.Forms.MenuItem
        Me.Timer3 = New System.Windows.Forms.Timer(Me.components)
        Me.Timer4 = New System.Windows.Forms.Timer(Me.components)
        CType(Me.StatusBarPanel1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.StatusBarPanel2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.StatusBarPanel3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.StatusBarPanel4, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel1.SuspendLayout()
        Me.SuspendLayout()
        '
        'MainMenu1
        '
        Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem18, Me.MenuItem23, Me.MenuItem116, Me.MenuItem28, Me.MenuItem31, Me.MenuItem33, Me.MenuItem65})
        '
        'MenuItem1
        '
        Me.MenuItem1.Index = 0
        Me.MenuItem1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem2, Me.MenuItem3, Me.MenuItem4, Me.MenuItem5, Me.MenuItem6, Me.MenuItem7, Me.MenuItem15})
        Me.MenuItem1.Text = "系统管理"
        '
        'MenuItem2
        '
        Me.MenuItem2.Index = 0
        Me.MenuItem2.Text = "用户管理"
        '
        'MenuItem3
        '
        Me.MenuItem3.Index = 1
        Me.MenuItem3.Text = "密码修改"
        '
        'MenuItem4
        '
        Me.MenuItem4.Index = 2
        Me.MenuItem4.Text = "-"
        '
        'MenuItem5
        '
        Me.MenuItem5.Index = 3
        Me.MenuItem5.Text = "数据备份"
        '
        'MenuItem6
        '
        Me.MenuItem6.Index = 4
        Me.MenuItem6.Text = "数据恢复"
        '
        'MenuItem7
        '
        Me.MenuItem7.Index = 5
        Me.MenuItem7.Text = "-"
        '
        'MenuItem15
        '
        Me.MenuItem15.Index = 6
        Me.MenuItem15.Text = "退出"
        '
        'MenuItem18
        '
        Me.MenuItem18.Index = 1
        Me.MenuItem18.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem19, Me.MenuItem20, Me.MenuItem21, Me.MenuItem22, Me.MenuItem27})
        Me.MenuItem18.Text = "基本信息管理"
        '
        'MenuItem19
        '
        Me.MenuItem19.Index = 0
        Me.MenuItem19.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem43, Me.MenuItem44})
        Me.MenuItem19.Text = "工程信息管理"
        '
        'MenuItem43
        '
        Me.MenuItem43.Index = 0
        Me.MenuItem43.Text = "工程信息管理"
        '
        'MenuItem44
        '
        Me.MenuItem44.Index = 1
        Me.MenuItem44.Text = "工程信息查询"
        '
        'MenuItem20
        '
        Me.MenuItem20.Index = 1
        Me.MenuItem20.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem45, Me.MenuItem46})
        Me.MenuItem20.Text = "业主信息管理"
        '
        'MenuItem45
        '
        Me.MenuItem45.Index = 0
        Me.MenuItem45.Text = "业主信息管理"
        '
        'MenuItem46
        '
        Me.MenuItem46.Index = 1
        Me.MenuItem46.Text = "业主信息查询"
        '
        'MenuItem21
        '
        Me.MenuItem21.Index = 2
        Me.MenuItem21.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem47, Me.MenuItem48})
        Me.MenuItem21.Text = "工程材料信息管理"
        '
        'MenuItem47
        '
        Me.MenuItem47.Index = 0
        Me.MenuItem47.Text = "工程材料信息管理"
        '
        'MenuItem48
        '
        Me.MenuItem48.Index = 1
        Me.MenuItem48.Text = "工程材料信息查询"
        '
        'MenuItem22
        '
        Me.MenuItem22.Index = 3
        Me.MenuItem22.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem49, Me.MenuItem50})
        Me.MenuItem22.Text = "银行基本信息管理"
        '
        'MenuItem49
        '
        Me.MenuItem49.Index = 0
        Me.MenuItem49.Text = "银行信息管理"
        '
        'MenuItem50
        '
        Me.MenuItem50.Index = 1
        Me.MenuItem50.Text = "银行信息查询"
        '
        'MenuItem27
        '
        Me.MenuItem27.Index = 4
        Me.MenuItem27.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem67})
        Me.MenuItem27.Text = "供应商信息管理"
        '
        'MenuItem67
        '
        Me.MenuItem67.Index = 0
        Me.MenuItem67.Text = "供应商信息管理"
        '
        'MenuItem23
        '
        Me.MenuItem23.Index = 2
        Me.MenuItem23.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem24, Me.MenuItem25, Me.MenuItem26, Me.MenuItem68})
        Me.MenuItem23.Text = "采购管理"
        '
        'MenuItem24
        '
        Me.MenuItem24.Index = 0
        Me.MenuItem24.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem51, Me.MenuItem52, Me.MenuItem53, Me.MenuItem54})
        Me.MenuItem24.Text = "预算管理"
        '
        'MenuItem51
        '
        Me.MenuItem51.Index = 0
        Me.MenuItem51.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem55, Me.MenuItem56})
        Me.MenuItem51.Text = "项目部"
        '
        'MenuItem55
        '
        Me.MenuItem55.Index = 0
        Me.MenuItem55.Text = "项目部文员录入"
        '
        'MenuItem56
        '
        Me.MenuItem56.Index = 1
        Me.MenuItem56.Text = "项目经理审批"
        '
        'MenuItem52
        '
        Me.MenuItem52.Index = 1
        Me.MenuItem52.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem57, Me.MenuItem58})
        Me.MenuItem52.Text = "采购部"
        '
        'MenuItem57
        '
        Me.MenuItem57.Index = 0
        Me.MenuItem57.Text = "采购部文员录入"
        '
        'MenuItem58
        '
        Me.MenuItem58.Index = 1
        Me.MenuItem58.Text = "采购部经理审批"
        '
        'MenuItem53
        '
        Me.MenuItem53.Index = 2
        Me.MenuItem53.Text = "总经理"
        '
        'MenuItem54
        '
        Me.MenuItem54.Index = 3
        Me.MenuItem54.Text = "财务经理"
        '
        'MenuItem25
        '
        Me.MenuItem25.Index = 1
        Me.MenuItem25.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem59, Me.MenuItem60})
        Me.MenuItem25.Text = "请购管理"
        '
        'MenuItem59
        '
        Me.MenuItem59.Index = 0
        Me.MenuItem59.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem63, Me.MenuItem64})
        Me.MenuItem59.Text = "项目部"
        '
        'MenuItem63
        '
        Me.MenuItem63.Index = 0
        Me.MenuItem63.Text = "项目部文员录入"
        '
        'MenuItem64
        '
        Me.MenuItem64.Index = 1
        Me.MenuItem64.Text = "项目部经理审批"
        '
        'MenuItem60
        '
        Me.MenuItem60.Index = 1
        Me.MenuItem60.Text = "分公司经理"
        '
        'MenuItem26
        '
        Me.MenuItem26.Index = 2
        Me.MenuItem26.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem69, Me.MenuItem70, Me.MenuItem71})
        Me.MenuItem26.Text = "采购管理"
        '
        'MenuItem69
        '
        Me.MenuItem69.Index = 0
        Me.MenuItem69.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem72, Me.MenuItem73, Me.MenuItem74})
        Me.MenuItem69.Text = "采购部"
        '
        'MenuItem72
        '
        Me.MenuItem72.Index = 0
        Me.MenuItem72.Text = "请购单类别分类"
        '
        'MenuItem73
        '
        Me.MenuItem73.Index = 1
        Me.MenuItem73.Text = "订购单单价录入"
        '
        'MenuItem74
        '
        Me.MenuItem74.Index = 2
        Me.MenuItem74.Text = "采购部经理审批"
        '
        'MenuItem70
        '
        Me.MenuItem70.Index = 1
        Me.MenuItem70.Text = "总经理审批"
        '
        'MenuItem71
        '
        Me.MenuItem71.Index = 2
        Me.MenuItem71.Text = "客户回传确认"
        '
        'MenuItem68
        '
        Me.MenuItem68.Index = 3