⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmmain.frm

📁 <Visual Basic 数据库开发实例精粹(第二版)>一书首先介绍了Visual Basic(简称VB)开发的技巧和重点技术
💻 FRM
📖 第 1 页 / 共 5 页
字号:
               BeginProperty ButtonMenu5 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "ModifyType"
                  Text            =   "修改类型(&M)"
               EndProperty
               BeginProperty ButtonMenu6 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "DelType"
                  Text            =   "删除类型(&D)"
               EndProperty
            EndProperty
         EndProperty
         BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "商品管理"
            Key             =   "Goods"
            ImageIndex      =   6
            Style           =   5
            BeginProperty ButtonMenus {66833FEC-8583-11D1-B16A-00C0F0283628} 
               NumButtonMenus  =   6
               BeginProperty ButtonMenu1 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "BrowseGoods"
                  Text            =   "浏览所有商品(&B)"
               EndProperty
               BeginProperty ButtonMenu2 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Text            =   "-"
               EndProperty
               BeginProperty ButtonMenu3 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "AddGoods"
                  Text            =   "添加商品(&A)"
               EndProperty
               BeginProperty ButtonMenu4 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "QueryGoods"
                  Text            =   "查询商品(&Q)"
               EndProperty
               BeginProperty ButtonMenu5 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "ModifyGoods"
                  Text            =   "修改商品(&M)"
               EndProperty
               BeginProperty ButtonMenu6 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "DelGoods"
                  Text            =   "删除商品(&D)"
               EndProperty
            EndProperty
         EndProperty
         BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "进货管理"
            Key             =   "Buy"
            ImageIndex      =   4
            Style           =   5
            BeginProperty ButtonMenus {66833FEC-8583-11D1-B16A-00C0F0283628} 
               NumButtonMenus  =   6
               BeginProperty ButtonMenu1 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "BrowseBuy"
                  Text            =   "浏览所有进货(&B))"
               EndProperty
               BeginProperty ButtonMenu2 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Text            =   "-"
               EndProperty
               BeginProperty ButtonMenu3 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "AddBuy"
                  Text            =   "登记进货(&A)"
               EndProperty
               BeginProperty ButtonMenu4 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "QueryBuy"
                  Text            =   "查询进货(&Q)"
               EndProperty
               BeginProperty ButtonMenu5 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "ModifyBuy"
                  Text            =   "修改进货(&M)"
               EndProperty
               BeginProperty ButtonMenu6 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "DelBuy"
                  Text            =   "删除进货(&D)"
               EndProperty
            EndProperty
         EndProperty
         BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "销售管理"
            Key             =   "Sale"
            ImageIndex      =   2
            Style           =   5
            BeginProperty ButtonMenus {66833FEC-8583-11D1-B16A-00C0F0283628} 
               NumButtonMenus  =   6
               BeginProperty ButtonMenu1 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "BrowseSale"
                  Text            =   "浏览所有销售(&B)"
               EndProperty
               BeginProperty ButtonMenu2 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Text            =   "-"
               EndProperty
               BeginProperty ButtonMenu3 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "AddSale"
                  Text            =   "登记销售(&A)"
               EndProperty
               BeginProperty ButtonMenu4 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "QuerySale"
                  Text            =   "查询销售(&Q)"
               EndProperty
               BeginProperty ButtonMenu5 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "ModifySale"
                  Text            =   "修改销售(&M)"
               EndProperty
               BeginProperty ButtonMenu6 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "DelSale"
                  Text            =   "删除销售(&M)"
               EndProperty
            EndProperty
         EndProperty
         BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "商品报损"
            Key             =   "Spoilage"
            ImageIndex      =   11
            Style           =   5
            BeginProperty ButtonMenus {66833FEC-8583-11D1-B16A-00C0F0283628} 
               NumButtonMenus  =   6
               BeginProperty ButtonMenu1 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "BrowseSpoilage"
                  Text            =   "浏览所有报损(&B)"
               EndProperty
               BeginProperty ButtonMenu2 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Text            =   "-"
               EndProperty
               BeginProperty ButtonMenu3 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "AddSpoilage"
                  Text            =   "登记报损(&B)"
               EndProperty
               BeginProperty ButtonMenu4 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "QuerySpoilage"
                  Text            =   "查询报损(&Q)"
               EndProperty
               BeginProperty ButtonMenu5 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "ModifySpoilage"
                  Text            =   "修改报损(&M)"
               EndProperty
               BeginProperty ButtonMenu6 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "DelSpoilage"
                  Text            =   "删除报损(&D)"
               EndProperty
            EndProperty
         EndProperty
         BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "统计分析"
            Key             =   "Stat"
            ImageIndex      =   10
            Style           =   5
            BeginProperty ButtonMenus {66833FEC-8583-11D1-B16A-00C0F0283628} 
               NumButtonMenus  =   3
               BeginProperty ButtonMenu1 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "StatBuy"
                  Text            =   "进货统计(&B)"
               EndProperty
               BeginProperty ButtonMenu2 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "StatSale"
                  Text            =   "销售统计(&S)"
               EndProperty
               BeginProperty ButtonMenu3 {66833FEE-8583-11D1-B16A-00C0F0283628} 
                  Key             =   "StatSpoilage"
                  Text            =   "报损统计(&P)"
               EndProperty
            EndProperty
         EndProperty
         BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "关于软件"
            Key             =   "About"
            ImageIndex      =   7
         EndProperty
         BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "退出系统"
            Key             =   "Exit"
            ImageIndex      =   8
         EndProperty
      EndProperty
      Begin MSComctlLib.ImageList imglView 
         Left            =   10140
         Top             =   150
         _ExtentX        =   1005
         _ExtentY        =   1005
         BackColor       =   -2147483643
         ImageWidth      =   16
         ImageHeight     =   16
         MaskColor       =   12632256
         _Version        =   393216
         BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
            NumListImages   =   4
            BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
               Picture         =   "frmMain.frx":ADD0
               Key             =   ""
            EndProperty
            BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
               Picture         =   "frmMain.frx":B122
               Key             =   ""
            EndProperty
            BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
               Picture         =   "frmMain.frx":B474
               Key             =   ""
            EndProperty
            BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
               Picture         =   "frmMain.frx":B7C6
               Key             =   ""
            EndProperty
         EndProperty
      End
      Begin VB.Timer tmrTime 
         Interval        =   1000
         Left            =   8490
         Top             =   210
      End
   End
   Begin MSComctlLib.StatusBar SBar 
      Align           =   2  'Align Bottom
      Height          =   300
      Left            =   0
      TabIndex        =   9
      Top             =   7635
      Width           =   11280
      _ExtentX        =   19897
      _ExtentY        =   529
      _Version        =   393216
      BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
         NumPanels       =   3
         BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Object.Width           =   8937
            MinWidth        =   8937
         EndProperty
         BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Alignment       =   1
            Object.Width           =   6500
            MinWidth        =   6500
            Text            =   "特瑞飞软件 打造软件精品"
            TextSave        =   "特瑞飞软件 打造软件精品"
         EndProperty
         BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Object.Width           =   4875
            MinWidth        =   4875
         EndProperty
      EndProperty
   End
   Begin VB.PictureBox picDescribe 
      Height          =   345
      Left            =   2501
      ScaleHeight     =   285
      ScaleWidth      =   8715
      TabIndex        =   10
      Top             =   1290
      Width           =   8770
      Begin VB.Label lblCount 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Height          =   180
         Left            =   1320
         TabIndex        =   38
         Top             =   90
         Width           =   90
      End
      Begin VB.Label lblDescribe 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "关于软件"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   210
         Left            =   210
         TabIndex        =   31
         Top             =   60
         Width           =   900
      End
   End
   Begin VB.Menu mnuSystem 
      Caption         =   "系统(&S)"
      Begin VB.Menu mnuUser 
         Caption         =   "用户管理(&U)"
         Begin VB.Menu mnuBrowseUser 
            Caption         =   "浏览所有用户(&B)"
         End
         Begin VB.Menu ln1 
            Caption         =   "-"
         End
         Begin VB.Menu mnuAddUser 
            Caption         =   "添加用户(&A)"
         End
         Begin VB.Menu mnuQueryUser 
            Caption         =   "查询用户(&Q)"
         End
         Begin VB.Menu mnuModifyUser 
            Caption         =   "修改用户(&M)"
         End
         Begin VB.Menu mnuDelUser 
            Caption         =   "删除用户(&D)"
         End
      End
      Begin VB.Menu ln2 
         Caption         =   "-"
      End
      Begin VB.Menu mnuExit 
         Caption         =   "退出系统(&E)"
         Shortcut        =   ^X
      End
   End
   Begin VB.Menu mnuSupplier 
      Caption         =   "供货商管理(&P)"
      Begin VB.Menu mnuBrowseSupplier 
         Caption         =   "浏览所有供货商(&B)"
      End
      Begin VB.Menu ln3 
         Caption         =   "-"
      End
      Begin VB.Menu mnuAddSupplier 
         Caption         =   "登记供货商(&A)"
      End
      Begin VB.Menu mnuQuerySupplier 
         Caption         =   "查询供货商(&Q)"
      End
      Begin VB.Menu mnuModifySupplier 
         Caption         =   "修改供货商(&M)"
      End
      Begin VB.Menu mnuDelSupplier 
         Caption         =   "删除供货商(&D)"
      End
   End
   Begin VB.Menu mnuGoodsType 
      Caption         =   "商品类型管理(&T)"
      Begin VB.Menu mnuBrowseType 
         Caption         =   "浏览所有商品类型(&B)"
      End
      Begin VB.Menu ln4 
         Caption         =   "-"
      End
      Begin VB.Menu mnuAddType 
         Caption         =   "添加类型(&A)"
      End
      Begin VB.Menu mnuQueryType 
         Caption         =   "查询类型(&Q)"
      End
      Begin VB.Menu mnuModifyType 
         Caption         =   "修改类型(&M)"
      End

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -