Planet Source Code Jumbo …e CD Visual Basic 1 to 7/5_2007-2008.ISO/data/Zips/airline_re204714292007.psc/frmPaySlipGeneration.frm

Text File | 2003-04-19 | 8KB | 238 lines

VERSION 5.00
Begin VB.Form frmPaySlipGeneration
   BackColor       =   &H00FFFFC0&
   Caption         =   "Pay Slip"
   ClientHeight    =   3195
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   4680
   BeginProperty Font
      Name            =   "Arial"
      Size            =   12
      Charset         =   0
      Weight          =   400
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   LinkTopic       =   "Form1"
   MDIChild        =   -1  'True
   ScaleHeight     =   11115
   ScaleWidth      =   15240
   WindowState     =   2  'Maximized
   Begin VB.Timer Timer1
      Left            =   1080
      Top             =   600
   End
   Begin VB.Frame Frame1
      BackColor       =   &H00FFFFC0&
      BorderStyle     =   0  'None
      Caption         =   "Frame1"
      Height          =   4935
      Left            =   240
      TabIndex        =   23
      Top             =   6240
      Width           =   12135
      Begin VB.CommandButton Command2
         Caption         =   "Save and Print"
         Height          =   375
         Left            =   3600
         TabIndex        =   36
         Top             =   3720
         Width           =   3615
      End
      Begin VB.Line Line9
         X1              =   5160
         X2              =   6600
         Y1              =   3600
         Y2              =   3600
      End
      Begin VB.Line Line8
         X1              =   5160
         X2              =   6600
         Y1              =   3480
         Y2              =   3480
      End
      Begin VB.Line Line7
         X1              =   5160
         X2              =   6600
         Y1              =   3120
         Y2              =   3120
      End
      Begin VB.Label txtNetSalary
         BackStyle       =   0  'Transparent
         Height          =   375
         Left            =   5160
         TabIndex        =   35
         Top             =   3120
         Width           =   2775
      End
      Begin VB.Label Label18
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Net Salary"
         Height          =   270
         Left            =   240
         TabIndex        =   34
         Top             =   3240
         Width           =   1080
      End
      Begin VB.Label txtAddAllowance
         BackStyle       =   0  'Transparent
         Height          =   375
         Left            =   5160
         TabIndex        =   33
         Top             =   2400
         Width           =   2775
      End
      Begin VB.Label Label17
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Add: Allowances"
         Height          =   270
         Left            =   720
         TabIndex        =   32
         Top             =   2400
         Width           =   1740
      End
      Begin VB.Label txtTaxDedn
         BackStyle       =   0  'Transparent
         Height          =   375
         Left            =   5160
         TabIndex        =   31
         Top             =   1920
         Width           =   2775
      End
      Begin VB.Label Label16
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Less:Tax Deduction"
         Height          =   270
         Left            =   720
         TabIndex        =   30
         Top             =   1920
         Width           =   2070
      End
      Begin VB.Label txtPFDeduction
         BackStyle       =   0  'Transparent
         Height          =   375
         Left            =   5160
         TabIndex        =   29
         Top             =   1440
         Width           =   2775
      End
      Begin VB.Label Label15
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Less: PF Deduction"
         Height          =   270
         Left            =   720
         TabIndex        =   28
         Top             =   1440
         Width           =   2070
      End
      Begin VB.Label txtLeaveDedn
         BackStyle       =   0  'Transparent
         Height          =   375
         Left            =   5160
         TabIndex        =   27
         Top             =   960
         Width           =   2775
      End
      Begin VB.Label Label14
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Less: Leave Deduction"
         Height          =   270
         Left            =   720
         TabIndex        =   26
         Top             =   960
         Width           =   2400
      End
      Begin VB.Label txtBaseSalary
         BackStyle       =   0  'Transparent
         Height          =   375
         Left            =   4920
         TabIndex        =   25
         Top             =   360
         Width           =   2775
      End
      Begin VB.Label Label13
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Base Salary"
         Height          =   270
         Left            =   240
         TabIndex        =   24
         Top             =   360
         Width           =   1275
      End
   End
   Begin VB.CommandButton Command1
      Caption         =   "Process PaySlip"
      Height          =   375
      Left            =   2400
      TabIndex        =   22
      Top             =   5400
      Width           =   2415
   End
   Begin VB.TextBox txtPFDed
      Enabled         =   0   'False
      Height          =   390
      Left            =   10680
      TabIndex        =   21
      Top             =   4800
      Width           =   1215
   End
   Begin VB.TextBox txtTaxDeduction
      Enabled         =   0   'False
      Height          =   390
      Left            =   10680
      TabIndex        =   19
      Top             =   4200
      Width           =   1215
   End
   Begin VB.TextBox txtLeavesAvailable
      Enabled         =   0   'False
      Height          =   390
      Left            =   10680
      TabIndex        =   17
      Top             =   3600
      Width           =   1215
   End
   Begin VB.TextBox txtTotWorkDays
      Enabled         =   0   'False
      Height          =   390
      Left            =   10680
      TabIndex        =   15
      Top             =   3000
      Width           =   1215
   End
   Begin VB.TextBox txtTotalLeave
      Height          =   390
      Left            =   3240
      TabIndex        =   10
      Top             =   4200
      Width           =   1455
   End
   Begin VB.TextBox txtAllowDesc
      Height          =   975
      Left            =   3240
      MaxLength       =   50
      MultiLine       =   -1  'True
      ScrollBars      =   2  'Vertical
      TabIndex        =   8
      Top             =   2880
      Width           =   3015
   End
   Begin VB.TextBox txtAllowance
      Height          =   390
      Left            =   3240
      TabIndex        =   6
      Top             =   2160
      Width           =   3015
   End
   Begin VB.
       Hh      s      =   2  'Vertical
       ,True
         BackStyle       =    AutoSize     th       To