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

📄 form1.frm

📁 这个商品销售管理系统实现了几乎所有的功能,并通过验收
💻 FRM
📖 第 1 页 / 共 4 页
字号:
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
Object = "{0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0"; "MSHFLXGD.OCX"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Begin VB.Form sale 
   Appearance      =   0  'Flat
   BackColor       =   &H80000005&
   Caption         =   "test1"
   ClientHeight    =   6390
   ClientLeft      =   60
   ClientTop       =   420
   ClientWidth     =   9675
   LinkTopic       =   "Form1"
   ScaleHeight     =   6390
   ScaleWidth      =   9675
   StartUpPosition =   3  '窗口缺省
   Begin TabDlg.SSTab SSTab1 
      Height          =   5775
      Left            =   120
      TabIndex        =   0
      Top             =   120
      Width           =   9495
      _ExtentX        =   16748
      _ExtentY        =   10186
      _Version        =   393216
      Tab             =   2
      TabHeight       =   520
      ForeColor       =   8421631
      BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "宋体"
         Size            =   14.25
         Charset         =   134
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      TabCaption(0)   =   "商 品 信 息"
      TabPicture(0)   =   "Form1.frx":0000
      Tab(0).ControlEnabled=   0   'False
      Tab(0).Control(0)=   "Timer1"
      Tab(0).Control(0).Enabled=   0   'False
      Tab(0).Control(1)=   "Command1"
      Tab(0).Control(1).Enabled=   0   'False
      Tab(0).Control(2)=   "Command2"
      Tab(0).Control(2).Enabled=   0   'False
      Tab(0).Control(3)=   "Command3"
      Tab(0).Control(3).Enabled=   0   'False
      Tab(0).Control(4)=   "Command4"
      Tab(0).Control(4).Enabled=   0   'False
      Tab(0).Control(5)=   "Text1(0)"
      Tab(0).Control(5).Enabled=   0   'False
      Tab(0).Control(6)=   "Text1(1)"
      Tab(0).Control(6).Enabled=   0   'False
      Tab(0).Control(7)=   "Text1(2)"
      Tab(0).Control(7).Enabled=   0   'False
      Tab(0).Control(8)=   "Text1(3)"
      Tab(0).Control(8).Enabled=   0   'False
      Tab(0).Control(9)=   "Text1(4)"
      Tab(0).Control(9).Enabled=   0   'False
      Tab(0).Control(10)=   "Text1(5)"
      Tab(0).Control(10).Enabled=   0   'False
      Tab(0).Control(11)=   "Text1(6)"
      Tab(0).Control(11).Enabled=   0   'False
      Tab(0).Control(12)=   "Text1(7)"
      Tab(0).Control(12).Enabled=   0   'False
      Tab(0).Control(13)=   "Adodc1"
      Tab(0).Control(13).Enabled=   0   'False
      Tab(0).Control(14)=   "DataGrid1"
      Tab(0).Control(14).Enabled=   0   'False
      Tab(0).Control(15)=   "Label3"
      Tab(0).Control(15).Enabled=   0   'False
      Tab(0).Control(16)=   "Label4"
      Tab(0).Control(16).Enabled=   0   'False
      Tab(0).Control(17)=   "Label5"
      Tab(0).Control(17).Enabled=   0   'False
      Tab(0).Control(18)=   "Label6"
      Tab(0).Control(18).Enabled=   0   'False
      Tab(0).Control(19)=   "Label7"
      Tab(0).Control(19).Enabled=   0   'False
      Tab(0).Control(20)=   "Label8"
      Tab(0).Control(20).Enabled=   0   'False
      Tab(0).Control(21)=   "Label9"
      Tab(0).Control(21).Enabled=   0   'False
      Tab(0).Control(22)=   "Label2"
      Tab(0).Control(22).Enabled=   0   'False
      Tab(0).Control(23)=   "Label1"
      Tab(0).Control(23).Enabled=   0   'False
      Tab(0).ControlCount=   24
      TabCaption(1)   =   " 销 售 信 息"
      TabPicture(1)   =   "Form1.frx":001C
      Tab(1).ControlEnabled=   0   'False
      Tab(1).Control(0)=   "Command10"
      Tab(1).Control(0).Enabled=   0   'False
      Tab(1).Control(1)=   "Text15"
      Tab(1).Control(1).Enabled=   0   'False
      Tab(1).Control(2)=   "Text14"
      Tab(1).Control(2).Enabled=   0   'False
      Tab(1).Control(3)=   "Command9"
      Tab(1).Control(3).Enabled=   0   'False
      Tab(1).Control(4)=   "Text13"
      Tab(1).Control(4).Enabled=   0   'False
      Tab(1).Control(5)=   "Command8"
      Tab(1).Control(5).Enabled=   0   'False
      Tab(1).Control(6)=   "Command7"
      Tab(1).Control(6).Enabled=   0   'False
      Tab(1).Control(7)=   "Command6"
      Tab(1).Control(7).Enabled=   0   'False
      Tab(1).Control(8)=   "Command5"
      Tab(1).Control(8).Enabled=   0   'False
      Tab(1).Control(9)=   "Text12"
      Tab(1).Control(9).Enabled=   0   'False
      Tab(1).Control(10)=   "Text11"
      Tab(1).Control(10).Enabled=   0   'False
      Tab(1).Control(11)=   "Text10"
      Tab(1).Control(11).Enabled=   0   'False
      Tab(1).Control(12)=   "Text9"
      Tab(1).Control(12).Enabled=   0   'False
      Tab(1).Control(13)=   "Text8"
      Tab(1).Control(13).Enabled=   0   'False
      Tab(1).Control(14)=   "Text7"
      Tab(1).Control(14).Enabled=   0   'False
      Tab(1).Control(15)=   "Text6"
      Tab(1).Control(15).Enabled=   0   'False
      Tab(1).Control(16)=   "Text5"
      Tab(1).Control(16).Enabled=   0   'False
      Tab(1).Control(17)=   "Text4"
      Tab(1).Control(17).Enabled=   0   'False
      Tab(1).Control(18)=   "Text3"
      Tab(1).Control(18).Enabled=   0   'False
      Tab(1).Control(19)=   "Text2"
      Tab(1).Control(19).Enabled=   0   'False
      Tab(1).Control(20)=   "DataCombo1"
      Tab(1).Control(20).Enabled=   0   'False
      Tab(1).Control(21)=   "MSHFlexGrid1"
      Tab(1).Control(21).Enabled=   0   'False
      Tab(1).Control(22)=   "Adodc2"
      Tab(1).Control(22).Enabled=   0   'False
      Tab(1).Control(23)=   "Label25"
      Tab(1).Control(23).Enabled=   0   'False
      Tab(1).Control(24)=   "Label24"
      Tab(1).Control(24).Enabled=   0   'False
      Tab(1).Control(25)=   "Label23"
      Tab(1).Control(25).Enabled=   0   'False
      Tab(1).Control(26)=   "Label22"
      Tab(1).Control(26).Enabled=   0   'False
      Tab(1).Control(27)=   "Label21"
      Tab(1).Control(27).Enabled=   0   'False
      Tab(1).Control(28)=   "Label20"
      Tab(1).Control(28).Enabled=   0   'False
      Tab(1).Control(29)=   "Label19"
      Tab(1).Control(29).Enabled=   0   'False
      Tab(1).Control(30)=   "Label18"
      Tab(1).Control(30).Enabled=   0   'False
      Tab(1).Control(31)=   "Label17"
      Tab(1).Control(31).Enabled=   0   'False
      Tab(1).Control(32)=   "Label16"
      Tab(1).Control(32).Enabled=   0   'False
      Tab(1).Control(33)=   "Label15"
      Tab(1).Control(33).Enabled=   0   'False
      Tab(1).Control(34)=   "Label14(0)"
      Tab(1).Control(34).Enabled=   0   'False
      Tab(1).Control(35)=   "Label13"
      Tab(1).Control(35).Enabled=   0   'False
      Tab(1).Control(36)=   "Label12"
      Tab(1).Control(36).Enabled=   0   'False
      Tab(1).Control(37)=   "Label11(0)"
      Tab(1).Control(37).Enabled=   0   'False
      Tab(1).Control(38)=   "Label10"
      Tab(1).Control(38).Enabled=   0   'False
      Tab(1).ControlCount=   39
      TabCaption(2)   =   "客 户 信 息"
      TabPicture(2)   =   "Form1.frx":0038
      Tab(2).ControlEnabled=   -1  'True
      Tab(2).Control(0)=   "Label26"
      Tab(2).Control(0).Enabled=   0   'False
      Tab(2).Control(1)=   "Label27(0)"
      Tab(2).Control(1).Enabled=   0   'False
      Tab(2).Control(2)=   "Label28"
      Tab(2).Control(2).Enabled=   0   'False
      Tab(2).Control(3)=   "Label29"
      Tab(2).Control(3).Enabled=   0   'False
      Tab(2).Control(4)=   "Label30"
      Tab(2).Control(4).Enabled=   0   'False
      Tab(2).Control(5)=   "Label31"
      Tab(2).Control(5).Enabled=   0   'False
      Tab(2).Control(6)=   "Label32"
      Tab(2).Control(6).Enabled=   0   'False
      Tab(2).Control(7)=   "Label33"
      Tab(2).Control(7).Enabled=   0   'False
      Tab(2).Control(8)=   "Label34"
      Tab(2).Control(8).Enabled=   0   'False
      Tab(2).Control(9)=   "Label35"
      Tab(2).Control(9).Enabled=   0   'False
      Tab(2).Control(10)=   "Label36"
      Tab(2).Control(10).Enabled=   0   'False
      Tab(2).Control(11)=   "Adodc3"
      Tab(2).Control(11).Enabled=   0   'False
      Tab(2).Control(12)=   "DataGrid2"
      Tab(2).Control(12).Enabled=   0   'False
      Tab(2).Control(13)=   "Text16(0)"
      Tab(2).Control(13).Enabled=   0   'False
      Tab(2).Control(14)=   "Text17"
      Tab(2).Control(14).Enabled=   0   'False
      Tab(2).Control(15)=   "Text18"
      Tab(2).Control(15).Enabled=   0   'False
      Tab(2).Control(16)=   "Text19"
      Tab(2).Control(16).Enabled=   0   'False
      Tab(2).Control(17)=   "Text20"
      Tab(2).Control(17).Enabled=   0   'False
      Tab(2).Control(18)=   "Text21"
      Tab(2).Control(18).Enabled=   0   'False
      Tab(2).Control(19)=   "Text22"
      Tab(2).Control(19).Enabled=   0   'False
      Tab(2).Control(20)=   "Text23"
      Tab(2).Control(20).Enabled=   0   'False
      Tab(2).Control(21)=   "Text24"
      Tab(2).Control(21).Enabled=   0   'False
      Tab(2).Control(22)=   "Text25"
      Tab(2).Control(22).Enabled=   0   'False
      Tab(2).Control(23)=   "Command11"
      Tab(2).Control(23).Enabled=   0   'False
      Tab(2).Control(24)=   "Command12"
      Tab(2).Control(24).Enabled=   0   'False
      Tab(2).Control(25)=   "Command13"
      Tab(2).Control(25).Enabled=   0   'False
      Tab(2).Control(26)=   "Command14"
      Tab(2).Control(26).Enabled=   0   'False
      Tab(2).ControlCount=   27
      Begin VB.CommandButton Command14 
         Caption         =   "退    出"
         Height          =   495
         Left            =   7440
         TabIndex        =   87
         Top             =   4920
         Width           =   1575
      End
      Begin VB.CommandButton Command13 
         Caption         =   "删 除 信 息"
         Height          =   495
         Left            =   5400
         TabIndex        =   86
         Top             =   4920
         Width           =   1695
      End
      Begin VB.CommandButton Command12 
         Caption         =   "增 加 信 息"
         Height          =   495
         Left            =   3120
         TabIndex        =   85
         Top             =   4920
         Width           =   1815
      End
      Begin VB.CommandButton Command11 
         Caption         =   "信 息 修 改"
         Height          =   495
         Left            =   1080
         TabIndex        =   84
         Top             =   4920
         Width           =   1695
      End
      Begin VB.TextBox Text25 
         Height          =   375
         Left            =   7920
         TabIndex        =   83
         Top             =   3720
         Width           =   1335
      End
      Begin VB.TextBox Text24 
         Height          =   375
         Left            =   6120
         TabIndex        =   82
         Top             =   4320
         Width           =   1215
      End
      Begin VB.TextBox Text23 
         Height          =   375
         Left            =   5520
         TabIndex        =   81
         Top             =   3720
         Width           =   1575
      End
      Begin VB.TextBox Text22 
         Height          =   375
         Left            =   6720
         TabIndex        =   80
         Top             =   3120
         Width           =   1815
      End
      Begin VB.TextBox Text21 
         Height          =   375
         Left            =   3720
         TabIndex        =   79
         Top             =   4320
         Width           =   1455
      End
      Begin VB.TextBox Text20 
         Height          =   375
         Left            =   3240
         TabIndex        =   78
         Top             =   3720
         Width           =   1215
      End
      Begin VB.TextBox Text19 
         Height          =   375
         Left            =   3720
         TabIndex        =   77
         Top             =   3120
         Width           =   1455
      End
      Begin VB.TextBox Text18 
         Height          =   375
         Left            =   1080
         TabIndex        =   76
         Top             =   4320
         Width           =   1455
      End
      Begin VB.TextBox Text17 
         Height          =   375
         Left            =   1080
         TabIndex        =   75
         Top             =   3720
         Width           =   1095
      End
      Begin VB.TextBox Text16 
         Height          =   375
         Index           =   0
         Left            =   1080
         TabIndex        =   65
         Top             =   3120
         Width           =   1575
      End
      Begin MSDataGridLib.DataGrid DataGrid2 
         Bindings        =   "Form1.frx":0054
         Height          =   2055
         Left            =   120
         TabIndex        =   63
         Top             =   960
         Width           =   9135
         _ExtentX        =   16113
         _ExtentY        =   3625
         _Version        =   393216
         BackColor       =   12615935
         HeadLines       =   1
         RowHeight       =   15
         BeginProperty HeadFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ColumnCount     =   2
         BeginProperty Column00 
            DataField       =   ""
            Caption         =   ""
            BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
               Type            =   0
               Format          =   ""
               HaveTrueFalseNull=   0
               FirstDayOfWeek  =   0

⌨️ 快捷键说明

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