frmpaydingjin.frm

本课题为实践课题

VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frmPayDingJin 
   Caption         =   "定金收取"
   ClientHeight    =   5100
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   8760
   LinkTopic       =   "Form1"
   ScaleHeight     =   5100
   ScaleWidth      =   8760
   StartUpPosition =   3  '窗口缺省
   Begin TabDlg.SSTab SSTab1 
      Height          =   3615
      Left            =   120
      TabIndex        =   11
      Top             =   1320
      Width           =   8535
      _ExtentX        =   15055
      _ExtentY        =   6376
      _Version        =   393216
      Tabs            =   2
      TabsPerRow      =   2
      TabHeight       =   520
      TabCaption(0)   =   "定 金 收 取"
      TabPicture(0)   =   "frmPayDingJin.frx":0000
      Tab(0).ControlEnabled=   -1  'True
      Tab(0).Control(0)=   "Frame2"
      Tab(0).Control(0).Enabled=   0   'False
      Tab(0).ControlCount=   1
      TabCaption(1)   =   "预定单资料"
      TabPicture(1)   =   "frmPayDingJin.frx":001C
      Tab(1).ControlEnabled=   0   'False
      Tab(1).Control(0)=   "Frame1"
      Tab(1).ControlCount=   1
      Begin VB.Frame Frame1 
         Height          =   2895
         Left            =   -74760
         TabIndex        =   21
         Top             =   480
         Width           =   8055
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   7
            Left            =   1440
            TabIndex        =   30
            Top             =   360
            Width           =   1215
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   8
            Left            =   3960
            TabIndex        =   29
            Top             =   360
            Width           =   1215
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   9
            Left            =   6720
            TabIndex        =   28
            Top             =   360
            Width           =   1215
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   10
            Left            =   1440
            TabIndex        =   27
            Top             =   960
            Width           =   1215
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   11
            Left            =   5280
            TabIndex        =   26
            Top             =   960
            Width           =   1215
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   12
            Left            =   1440
            TabIndex        =   25
            Top             =   1560
            Width           =   1215
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   13
            Left            =   5280
            TabIndex        =   24
            Top             =   1560
            Width           =   1695
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   14
            Left            =   1440
            TabIndex        =   23
            Top             =   2160
            Width           =   1215
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   15
            Left            =   5280
            TabIndex        =   22
            Top             =   2160
            Width           =   1695
         End
         Begin VB.Label Label1 
            Caption         =   "预定单编号"
            Height          =   255
            Index           =   15
            Left            =   360
            TabIndex        =   42
            Top             =   480
            Width           =   975
         End
         Begin VB.Label Label1 
            Caption         =   "预定客户"
            Height          =   255
            Index           =   14
            Left            =   3000
            TabIndex        =   41
            Top             =   480
            Width           =   735
         End
         Begin VB.Label Label1 
            Caption         =   "预定房屋编号"
            Height          =   255
            Index           =   13
            Left            =   5520
            TabIndex        =   40
            Top             =   480
            Width           =   1215
         End
         Begin VB.Label Label1 
            Caption         =   "定  金"
            Height          =   255
            Index           =   12
            Left            =   360
            TabIndex        =   39
            Top             =   1080
            Width           =   735
         End
         Begin VB.Label Label1 
            Caption         =   "定金有效期"
            Height          =   255
            Index           =   11
            Left            =   3840
            TabIndex        =   38
            Top             =   1080
            Width           =   975
         End
         Begin VB.Label Label2 
            Caption         =   "天"
            Height          =   255
            Index           =   1
            Left            =   6720
            TabIndex        =   37
            Top             =   1080
            Width           =   375
         End
         Begin VB.Label Label1 
            Caption         =   "计划租期"
            Height          =   255
            Index           =   10
            Left            =   360
            TabIndex        =   36
            Top             =   1680
            Width           =   735
         End
         Begin VB.Label Label3 
            Caption         =   "元"
            Height          =   255
            Left            =   2760
            TabIndex        =   35
            Top             =   1080
            Width           =   375
         End
         Begin VB.Label Label1 
            Caption         =   "计划起租日期"
            Height          =   255
            Index           =   9
            Left            =   3840
            TabIndex        =   34
            Top             =   1680
            Width           =   1215
         End
         Begin VB.Label Label1 
            Caption         =   "业 务 员"
            Height          =   255
            Index           =   7
            Left            =   360
            TabIndex        =   33
            Top             =   2280
            Width           =   735
         End
         Begin VB.Label Label1 
            Caption         =   "预定日期"
            Height          =   255
            Index           =   8
            Left            =   4200
            TabIndex        =   32
            Top             =   2280
            Width           =   735
         End
         Begin VB.Label Label4 
            Caption         =   "月"
            Height          =   255
            Left            =   2760
            TabIndex        =   31
            Top             =   1680
            Width           =   375
         End
      End
      Begin VB.Frame Frame2 
         Height          =   2895
         Left            =   240
         TabIndex        =   12
         Top             =   480
         Width           =   8055
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   0
            Left            =   1320
            TabIndex        =   1
            Top             =   360
            Width           =   1095
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   1
            Left            =   3960
            TabIndex        =   2
            Top             =   360
            Width           =   1095
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   2
            Left            =   6720
            TabIndex        =   3
            Top             =   360
            Width           =   1095
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   3
            Left            =   1320
            TabIndex        =   4
            Top             =   960
            Width           =   1095
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   4
            Left            =   3960
            TabIndex        =   5
            Top             =   960
            Width           =   1095
         End
         Begin VB.TextBox Text1 
            Height          =   375
            Index           =   5
            Left            =   6720
            TabIndex        =   6
            Top             =   960
            Width           =   1095
         End
         Begin VB.TextBox Text1 
            Height          =   975
            Index           =   6
            Left            =   1320
            MultiLine       =   -1  'True
            TabIndex        =   7
            Top             =   1560
            Width           =   6495
         End
         Begin VB.Label Label1 
            Caption         =   " 收费编号"
            Height          =   255
            Index           =   0
            Left            =   240
            TabIndex        =   20
            Top             =   480