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

📄 frm_cgclgl.frm

📁 采用VB和SQL2000 开发的 采购管理系统 对初学有很大帮助
💻 FRM
📖 第 1 页 / 共 3 页
字号:
         Width           =   1335
      End
      Begin VB.ComboBox Combo3 
         Height          =   300
         ItemData        =   "frm_cgclgl.frx":0015
         Left            =   1080
         List            =   "frm_cgclgl.frx":0022
         TabIndex        =   28
         Top             =   1320
         Width           =   1455
      End
      Begin VB.ComboBox Combo1 
         Height          =   300
         ItemData        =   "frm_cgclgl.frx":003A
         Left            =   6360
         List            =   "frm_cgclgl.frx":0050
         TabIndex        =   26
         Top             =   600
         Width           =   1335
      End
      Begin VB.TextBox Text7 
         Height          =   300
         Left            =   3480
         TabIndex        =   25
         Top             =   600
         Width           =   1695
      End
      Begin VB.TextBox Text6 
         Height          =   300
         Left            =   3480
         Locked          =   -1  'True
         TabIndex        =   23
         Top             =   960
         Width           =   4215
      End
      Begin VB.TextBox Text5 
         Height          =   300
         Left            =   1080
         Locked          =   -1  'True
         TabIndex        =   21
         Top             =   960
         Width           =   1455
      End
      Begin VB.TextBox Text4 
         Height          =   300
         Left            =   1080
         Locked          =   -1  'True
         TabIndex        =   18
         Top             =   600
         Width           =   1455
      End
      Begin VB.TextBox Text3 
         Height          =   300
         Left            =   6360
         Locked          =   -1  'True
         TabIndex        =   16
         Top             =   240
         Width           =   1335
      End
      Begin VB.TextBox Text2 
         Height          =   300
         Left            =   3480
         TabIndex        =   13
         Top             =   240
         Width           =   1695
      End
      Begin VB.TextBox Text1 
         Height          =   300
         Left            =   1080
         TabIndex        =   11
         Top             =   240
         Width           =   1455
      End
      Begin VB.Label Label15 
         BackStyle       =   0  'Transparent
         Caption         =   "备注"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2640
         TabIndex        =   34
         Top             =   1800
         Width           =   855
      End
      Begin VB.Label Label14 
         BackStyle       =   0  'Transparent
         Caption         =   "采购日期"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   120
         TabIndex        =   32
         Top             =   1800
         Width           =   1095
      End
      Begin VB.Label Label13 
         BackStyle       =   0  'Transparent
         Caption         =   "采购员姓名"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   5280
         TabIndex        =   30
         Top             =   1440
         Width           =   975
      End
      Begin VB.Label Label12 
         BackStyle       =   0  'Transparent
         Caption         =   "采购员编号"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2560
         TabIndex        =   29
         Top             =   1440
         Width           =   975
      End
      Begin VB.Label Label11 
         BackStyle       =   0  'Transparent
         Caption         =   "结算币"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   120
         TabIndex        =   27
         Top             =   1440
         Width           =   735
      End
      Begin VB.Label Label9 
         BackStyle       =   0  'Transparent
         Caption         =   "电话"
         ForeColor       =   &H00C00000&
         Height          =   300
         Left            =   2640
         TabIndex        =   22
         Top             =   1080
         Width           =   855
      End
      Begin VB.Label Label8 
         BackStyle       =   0  'Transparent
         Caption         =   "联系人"
         ForeColor       =   &H00C00000&
         Height          =   300
         Left            =   120
         TabIndex        =   20
         Top             =   1080
         Width           =   735
      End
      Begin VB.Label Label7 
         BackStyle       =   0  'Transparent
         Caption         =   "单价"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2640
         TabIndex        =   19
         Top             =   720
         Width           =   495
      End
      Begin VB.Label Label6 
         BackStyle       =   0  'Transparent
         Caption         =   "单位"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   5280
         TabIndex        =   17
         Top             =   720
         Width           =   495
      End
      Begin VB.Label Label4 
         BackStyle       =   0  'Transparent
         Caption         =   "供应商名称"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   120
         TabIndex        =   15
         Top             =   720
         Width           =   975
      End
      Begin VB.Label Label3 
         BackStyle       =   0  'Transparent
         Caption         =   "供应商编号"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   5250
         TabIndex        =   14
         Top             =   360
         Width           =   975
      End
      Begin VB.Label Label2 
         BackStyle       =   0  'Transparent
         Caption         =   "货物名称"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2640
         TabIndex        =   12
         Top             =   360
         Width           =   735
      End
      Begin VB.Label Label1 
         BackStyle       =   0  'Transparent
         Caption         =   "货物编号"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   120
         TabIndex        =   10
         Top             =   360
         Width           =   1095
      End
   End
   Begin VB.TextBox Text13 
      DataField       =   "货物编号"
      DataSource      =   "Adodc1"
      Height          =   375
      Left            =   1920
      TabIndex        =   44
      Text            =   "Text13"
      Top             =   4560
      Width           =   1095
   End
   Begin VB.Frame Frame3 
      Height          =   615
      Left            =   0
      TabIndex        =   37
      Top             =   0
      Width           =   7815
      Begin VB.CommandButton Command2 
         Caption         =   "取消"
         Height          =   350
         Left            =   6840
         TabIndex        =   42
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Command1 
         Caption         =   "确定"
         Height          =   350
         Left            =   5880
         TabIndex        =   41
         Top             =   200
         Width           =   855
      End
      Begin VB.TextBox Text12 
         Height          =   300
         Left            =   3960
         TabIndex        =   40
         Top             =   240
         Width           =   1575
      End
      Begin VB.ComboBox Combo4 
         Height          =   300
         ItemData        =   "frm_cgclgl.frx":0070
         Left            =   2880
         List            =   "frm_cgclgl.frx":0086
         Style           =   2  'Dropdown List
         TabIndex        =   39
         Top             =   240
         Width           =   975
      End
      Begin VB.ComboBox Combo5 
         Height          =   300
         ItemData        =   "frm_cgclgl.frx":00A7
         Left            =   1080
         List            =   "frm_cgclgl.frx":00BA
         Style           =   2  'Dropdown List
         TabIndex        =   38
         Top             =   240
         Width           =   1695
      End
      Begin VB.Label Label10 
         Caption         =   "查询条件"
         ForeColor       =   &H00808000&
         Height          =   195
         Index           =   1
         Left            =   120
         TabIndex        =   43
         Top             =   320
         Width           =   975
      End
   End
   Begin VB.Frame Frame1 
      Height          =   615
      Left            =   0
      TabIndex        =   0
      Top             =   0
      Width           =   7815
      Begin VB.CommandButton Cmd_refurbish 
         Caption         =   "刷新"
         Height          =   350
         Left            =   4920
         TabIndex        =   9
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Cmd_save 
         Caption         =   "保存"
         Enabled         =   0   'False
         Height          =   350
         Left            =   3000
         TabIndex        =   8
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Cmd_exit 
         Caption         =   "关闭"
         Height          =   350
         Left            =   6840
         TabIndex        =   6
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Cmd_query 
         Caption         =   "查询"
         Height          =   350
         Left            =   5880
         TabIndex        =   5
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Cmd_cancel 
         Caption         =   "取消"
         Height          =   350
         Left            =   3960
         TabIndex        =   4
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Cmd_edit 
         Caption         =   "修改"
         Enabled         =   0   'False
         Height          =   350
         Left            =   2040
         TabIndex        =   3
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Cmd_del 
         Caption         =   "删除"
         Enabled         =   0   'False
         Height          =   350
         Left            =   1080
         TabIndex        =   2
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Cmd_add 
         Caption         =   "增加"
         Height          =   350
         Left            =   120
         TabIndex        =   1
         Top             =   200
         Width           =   855
      End
   End
End
Attribute VB_Name = "frm_cgclgl"
Attribute VB_GlobalNameSpace = False

⌨️ 快捷键说明

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