frmbooks.frm

所在类别： 随书资源/T 工业技术/TP 自动化技术、计算机技术/TP31 计算机软件 其他题名： 作者： 夏邦贵, 刘凡馨等编著 出版者： 机械工业出版社 出版年： 2006 I

VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "Comdlg32.ocx"
Begin VB.Form frmBooks 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "图书信息管理"
   ClientHeight    =   5505
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   9480
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MDIChild        =   -1  'True
   ScaleHeight     =   5505
   ScaleWidth      =   9480
   Begin VB.CommandButton cmdSave 
      Caption         =   "保存"
      Height          =   300
      Left            =   5489
      TabIndex        =   27
      Top             =   4860
      Width           =   735
   End
   Begin VB.PictureBox picNavigation 
      AutoSize        =   -1  'True
      BorderStyle     =   0  'None
      Height          =   345
      Left            =   476
      ScaleHeight     =   345
      ScaleWidth      =   2760
      TabIndex        =   21
      Top             =   4860
      Width           =   2760
      Begin VB.TextBox txtNews 
         Height          =   300
         Left            =   720
         Locked          =   -1  'True
         TabIndex        =   26
         TabStop         =   0   'False
         Top             =   0
         Width           =   1275
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   ">"
         Height          =   300
         Index           =   2
         Left            =   2010
         TabIndex        =   25
         Top             =   15
         Width           =   360
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   ">|"
         Height          =   300
         Index           =   3
         Left            =   2370
         TabIndex        =   24
         Top             =   15
         Width           =   360
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   "|<"
         Height          =   300
         Index           =   0
         Left            =   15
         TabIndex        =   23
         Top             =   15
         Width           =   360
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   "<"
         Height          =   300
         Index           =   1
         Left            =   375
         TabIndex        =   22
         Top             =   15
         Width           =   360
      End
   End
   Begin MSComDlg.CommonDialog CommonDialog1 
      Left            =   7736
      Top             =   300
      _ExtentX        =   847
      _ExtentY        =   847
      _Version        =   393216
      Filter          =   "图片(*.bmp,*.gif)|*.bmp;*.gif"
   End
   Begin VB.CommandButton cmdDeletePic 
      Cancel          =   -1  'True
      Caption         =   "删除图片"
      Height          =   300
      Left            =   7343
      TabIndex        =   20
      Top             =   4860
      Width           =   1095
   End
   Begin VB.CommandButton cdmLoadPic 
      Caption         =   "载入图片"
      Height          =   300
      Left            =   6236
      TabIndex        =   19
      Top             =   4860
      Width           =   1095
   End
   Begin VB.CommandButton cmdAdd 
      Caption         =   "添加"
      Height          =   300
      Left            =   3248
      TabIndex        =   18
      Top             =   4860
      Width           =   735
   End
   Begin VB.CommandButton cmdDelete 
      Caption         =   "删除"
      Height          =   300
      Left            =   3995
      TabIndex        =   17
      Top             =   4860
      Width           =   735
   End
   Begin VB.CommandButton cmdExit 
      Caption         =   "退出"
      Height          =   300
      Left            =   8456
      TabIndex        =   16
      Top             =   4860
      Width           =   735
   End
   Begin VB.CommandButton cmdSeek 
      Caption         =   "查找"
      Height          =   300
      Left            =   4742
      TabIndex        =   15
      Top             =   4860
      Width           =   735
   End
   Begin VB.TextBox txtBrief 
      Height          =   1815
      Left            =   1369
      MultiLine       =   -1  'True
      ScrollBars      =   2  'Vertical
      TabIndex        =   14
      Text            =   "frmBooks.frx":0000
      Top             =   2940
      Width           =   4095
   End
   Begin VB.TextBox txtPrice 
      Height          =   375
      Left            =   4129
      TabIndex        =   13
      Text            =   "Text6"
      Top             =   2527
      Width           =   1335
   End
   Begin VB.TextBox txtPage 
      Height          =   375
      Left            =   1369
      TabIndex        =   12
      Text            =   "Text5"
      Top             =   2527
      Width           =   1335
   End
   Begin VB.TextBox txtDate 
      Height          =   375
      Left            =   1369
      TabIndex        =   11
      Text            =   "Text4"
      Top             =   2047
      Width           =   4095
   End
   Begin VB.TextBox txtPublish 
      Height          =   375
      Left            =   1369
      TabIndex        =   10
      Text            =   "Text3"
      Top             =   1567
      Width           =   4095
   End
   Begin VB.TextBox txtWriter 
      Height          =   375
      Left            =   1369
      TabIndex        =   9
      Text            =   "Text2"
      Top             =   1087
      Width           =   4095
   End
   Begin VB.TextBox txtName 
      Height          =   375
      Left            =   1369
      TabIndex        =   7
      Text            =   "Text1"
      Top             =   607
      Width           =   4095
   End
   Begin VB.Image Image1 
      BorderStyle     =   1  'Fixed Single
      Height          =   3855
      Left            =   5576
      Stretch         =   -1  'True
      Top             =   900
      Width           =   3615
   End
   Begin VB.Label Label8 
      AutoSize        =   -1  'True
      Caption         =   "图书封面："
      Height          =   180
      Left            =   5689
      TabIndex        =   8
      Top             =   607
      Width           =   900
   End
   Begin VB.Label Label7 
      AutoSize        =   -1  'True
      Caption         =   "单价(元/册)："
      Height          =   180
      Left            =   2929
      TabIndex        =   6
      Top             =   2624
      Width           =   1170
   End
   Begin VB.Label Label6 
      AutoSize        =   -1  'True
      Caption         =   "页数(万字)："
      Height          =   180
      Left            =   289
      TabIndex        =   5
      Top             =   2624
      Width           =   1080
   End
   Begin VB.Label Label5 
      AutoSize        =   -1  'True
      Caption         =   "内容简介："
      Height          =   180
      Left            =   469
      TabIndex        =   4
      Top             =   3007
      Width           =   900
   End
   Begin VB.Label Label4 
      AutoSize        =   -1  'True
      Caption         =   "出版日期："
      Height          =   180
      Left            =   469
      TabIndex        =   3
      Top             =   2144
      Width           =   900