VERSION 5.00
Begin VB.Form 主界面 
   Caption         =   "主界面"
   ClientHeight    =   6000
   ClientLeft      =   4245
   ClientTop       =   2940
   ClientWidth     =   7485
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   Picture         =   "主界面.frx":0000
   ScaleHeight     =   6000
   ScaleWidth      =   7485
   Begin VB.Menu 基本數(shù)據(jù) 
      Caption         =   "基本數(shù)據(jù)管理"
      Begin VB.Menu 廠商信息 
         Caption         =   "廠商基本信息"
      End
      Begin VB.Menu 商品信息 
         Caption         =   "商品基本信息"
      End
      Begin VB.Menu 職員信息 
         Caption         =   "職員基本信息"
      End
   End
   Begin VB.Menu 采購信息 
      Caption         =   "采購信息管理"
      Begin VB.Menu 詢價 
         Caption         =   "采購詢價"
      End
      Begin VB.Menu 廠單 
         Caption         =   "廠單信息"
      End
   End
   Begin VB.Menu 銷售信息 
      Caption         =   "銷售信息管理"
      Begin VB.Menu 銷售 
         Caption         =   "銷售報價及錄入"
      End
   End
   Begin VB.Menu 信息查詢 
      Caption         =   "信息統(tǒng)計查詢"
      Begin VB.Menu 商品查詢 
         Caption         =   "商品信息查詢"
      End
      Begin VB.Menu 排行 
         Caption         =   "銷售排行"
      End
   End
   Begin VB.Menu 退出 
      Caption         =   "系統(tǒng)退出"
   End
End
Attribute VB_Name = "主界面"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub 廠單_Click()
廠單信息.Show
Unload Me
End Sub

Private Sub 廠商信息_Click()
廠商基本信息.Show
Unload Me
End Sub

Private Sub 排行_Click()
銷售排行.Show
Unload Me
End Sub

Private Sub 商品查詢_Click()
商品信息查詢.Show
Unload Me
End Sub

Private Sub 商品信息_Click()
商品基本信息.Show
Unload Me
End Sub

Private Sub 退出_Click()
End
End Sub

Private Sub 銷售_Click()
銷售報價.Show
Unload Me
End Sub

Private Sub 詢價_Click()
采購詢價.Show
Unload Me
End Sub

Private Sub 職員信息_Click()
職員基本信息.Show
Unload Me
End Sub