+

VB开发的ERP系统

VERSION 5.00
Begin VB.Form Xs_Mcx_ReturnMoneyList 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "回款列表查询条件"
   ClientHeight    =   4110
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   4845
   Icon            =   "回款查询.frx":0000
   KeyPreview      =   -1  'True
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   4110
   ScaleWidth      =   4845
   ShowInTaskbar   =   0   'False
   StartUpPosition =   1  '所有者中心
   Begin VB.CommandButton Cmd_Clear 
      Caption         =   "全清"
      Height          =   300
      Left            =   75
      TabIndex        =   9
      Top             =   3720
      Width           =   1120
   End
   Begin VB.Frame Frame1 
      Height          =   3585
      Left            =   75
      TabIndex        =   11
      Top             =   30
      Width           =   4650
      Begin VB.CommandButton Ydcommand1 
         Height          =   300
         Index           =   5
         Left            =   4230
         Picture         =   "回款查询.frx":1042
         Style           =   1  'Graphical
         TabIndex        =   33
         Top             =   1575
         Visible         =   0   'False
         Width           =   300
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   5
         Left            =   1110
         TabIndex        =   32
         Text            =   "5"
         Top             =   1575
         Width           =   3135
      End
      Begin VB.Frame Frame3 
         Caption         =   "核销状态"
         Height          =   585
         Left            =   150
         TabIndex        =   28
         Top             =   2895
         Width           =   4365
         Begin VB.OptionButton Opt_Check 
            Caption         =   "全部"
            Height          =   195
            Index           =   3
            Left            =   180
            TabIndex        =   31
            Top             =   270
            Value           =   -1  'True
            Width           =   855
         End
         Begin VB.OptionButton Opt_Check 
            Caption         =   "已核销"
            Height          =   195
            Index           =   4
            Left            =   2910
            TabIndex        =   30
            Top             =   270
            Width           =   855
         End
         Begin VB.OptionButton Opt_Check 
            Caption         =   "未核销"
            Height          =   195
            Index           =   5
            Left            =   1545
            TabIndex        =   29
            Top             =   270
            Width           =   855
         End
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   0
         Left            =   1110
         TabIndex        =   27
         Text            =   "0"
         Top             =   255
         Width           =   1335
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   1
         Left            =   3000
         TabIndex        =   26
         Text            =   "1"
         Top             =   255
         Width           =   1245
      End
      Begin VB.CommandButton Ydcommand1 
         Height          =   300
         Index           =   7
         Left            =   2070
         Picture         =   "回款查询.frx":13CC
         Style           =   1  'Graphical
         TabIndex        =   25
         Top             =   1905
         Visible         =   0   'False
         Width           =   300
      End
      Begin VB.CommandButton Ydcommand1 
         Height          =   300
         Index           =   2
         Left            =   4230
         Picture         =   "回款查询.frx":1756
         Style           =   1  'Graphical
         TabIndex        =   24
         Top             =   585
         Visible         =   0   'False
         Width           =   300
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   3
         Left            =   1110
         TabIndex        =   22
         Text            =   "3"
         Top             =   915
         Width           =   3420
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   2
         Left            =   1110
         TabIndex        =   20
         Text            =   "2"
         Top             =   585
         Width           =   3135
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   7
         Left            =   1110
         TabIndex        =   2
         Text            =   "7"
         Top             =   1905
         Width           =   1035
      End
      Begin VB.CommandButton Ydcommand1 
         Height          =   300
         Index           =   6
         Left            =   4230
         Picture         =   "回款查询.frx":1AE0
         Style           =   1  'Graphical
         TabIndex        =   18
         Top             =   1905
         Visible         =   0   'False
         Width           =   300
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   6
         Left            =   3270
         TabIndex        =   1
         Text            =   "6"
         Top             =   1905
         Width           =   975
      End
      Begin VB.CommandButton Ydcommand1 
         Height          =   300
         Index           =   4
         Left            =   4230
         Picture         =   "回款查询.frx":1E6A
         Style           =   1  'Graphical
         TabIndex        =   16
         Top             =   1245
         Visible         =   0   'False
         Width           =   300
      End
      Begin VB.TextBox LrText 
         Height          =   300
         Index           =   4
         Left            =   1110
         TabIndex        =   0
         Text            =   "4"
         Top             =   1245
         Width           =   3135
      End
      Begin VB.Frame Frame2 
         Caption         =   "审核状态"
         Height          =   585
         Left            =   150
         TabIndex        =   3
         Top             =   2265
         Width           =   4365
         Begin VB.OptionButton Opt_Check 
            Caption         =   "全部"
            Height          =   195
            Index           =   0
            Left            =   180
            TabIndex        =   4
            Top             =   270
            Value           =   -1  'True
            Width           =   855
         End
         Begin VB.OptionButton Opt_Check 
            Caption         =   "未审核"
            Height          =   195
            Index           =   1
            Left            =   1530
            TabIndex        =   5
            Top             =   270
            Width           =   855
         End
         Begin VB.OptionButton Opt_Check 
            Caption         =   "已审核"
            Height          =   195
            Index           =   2
            Left            =   2910
            TabIndex        =   6
            Top             =   270
            Width           =   855
         End
      End
      Begin VB.CommandButton Ydcommand1 
         Height          =   300
         Index           =   0
         Left            =   2430
         Picture         =   "回款查询.frx":21F4
         Style           =   1  'Graphical
         TabIndex        =   14
         Top             =   255
         Visible         =   0   'False
         Width           =   300
      End
      Begin VB.CommandButton Ydcommand1 
         Height          =   300
         Index           =   1
         Left            =   4230
         Picture         =   "回款查询.frx":257E
         Style           =   1  'Graphical
         TabIndex        =   12
         Top             =   255
         Visible         =   0   'False
         Width           =   300
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "部门名称:"
         Height          =   180
         Index           =   5
         Left            =   150
         TabIndex        =   34
         Tag             =   "deptcode"
         Top             =   1635
         Width           =   810
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "回款单号:"
         Height          =   180
         Index           =   3
         Left            =   150
         TabIndex        =   23
         Tag             =   "ReturnMoneyCode"
         Top             =   975
         Width           =   810
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "客户名称:"
         Height          =   180
         Index           =   2
         Left            =   150
         TabIndex        =   21
         Tag             =   "cuscode"
         Top             =   645
         Width           =   810
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "结算方式:"
         Height          =   180
         Index           =   7
         Left            =   150
         TabIndex        =   19
         Tag             =   "SsCode"
         Top             =   1965
         Width           =   810
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "销售员:"
         Height          =   180
         Index           =   6
         Left            =   2550
         TabIndex        =   17
         Tag             =   "personcode"
         Top             =   1965
         Width           =   630
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "回款类型:"
         Height          =   180
         Index           =   4
         Left            =   150
         TabIndex        =   15
         Tag             =   "RmtCode"
         Top             =   1305
         Width           =   810
      End
      Begin VB.Label Label1 
         Caption         =   "回款日期:"
         Height          =   255
         Index           =   0
         Left            =   150
         TabIndex        =   13
         Tag             =   "ReturnDate"
         Top             =   285
         Width           =   1035
      End
      Begin VB.Line Line2 
         Index           =   1
         X1              =   2790
         X2              =   2940
         Y1              =   405
         Y2              =   405
      End
   End
   Begin VB.CommandButton QxCommand 
      Caption         =   "取消(&C)"
      Height          =   300
      Left            =   3635
      TabIndex        =   8
      Top             =   3720
      Width           =   1120
   End
   Begin VB.CommandButton QdCommand 
      Caption         =   "确定(&O)"
      Height          =   300
      Left            =   2430
      TabIndex        =   7
      Top             =   3720
      Width           =   1120
   End