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

📄 frmstatus.vb

📁 humar resourse management
💻 VB
📖 第 1 页 / 共 3 页
字号:
        Me.cbxVStatus.ForeColor = System.Drawing.SystemColors.ControlText
        Me.cbxVStatus.Items.AddRange(New Object() {"Yet To", "Not Arrived", "Arrived", "Under Endorsement", "Endorsed", "Rejected"})
        Me.cbxVStatus.Location = New System.Drawing.Point(172, 330)
        Me.cbxVStatus.Name = "cbxVStatus"
        Me.cbxVStatus.Size = New System.Drawing.Size(224, 21)
        Me.cbxVStatus.TabIndex = 13
        Me.cbxVStatus.Text = "Visa"
        '
        'cbxDStatus
        '
        Me.cbxDStatus.BackColor = System.Drawing.Color.White
        Me.cbxDStatus.ForeColor = System.Drawing.SystemColors.ControlText
        Me.cbxDStatus.Items.AddRange(New Object() {"Yet To", "Waiting For Ticket", "Ticket Confirmed", "Left", "Cancelled"})
        Me.cbxDStatus.Location = New System.Drawing.Point(172, 367)
        Me.cbxDStatus.Name = "cbxDStatus"
        Me.cbxDStatus.Size = New System.Drawing.Size(224, 21)
        Me.cbxDStatus.TabIndex = 15
        Me.cbxDStatus.Text = "Departure"
        '
        'btnGo
        '
        Me.btnGo.BackColor = System.Drawing.Color.Chocolate
        Me.btnGo.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnGo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.btnGo.ForeColor = System.Drawing.Color.Black
        Me.btnGo.Location = New System.Drawing.Point(508, 48)
        Me.btnGo.Name = "btnGo"
        Me.btnGo.Size = New System.Drawing.Size(32, 23)
        Me.btnGo.TabIndex = 2
        Me.btnGo.Text = "&Go"
        '
        'txtPPNo
        '
        Me.txtPPNo.BackColor = System.Drawing.Color.White
        Me.txtPPNo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.txtPPNo.ForeColor = System.Drawing.SystemColors.ControlText
        Me.txtPPNo.Location = New System.Drawing.Point(324, 131)
        Me.txtPPNo.Name = "txtPPNo"
        Me.txtPPNo.ReadOnly = True
        Me.txtPPNo.Size = New System.Drawing.Size(216, 20)
        Me.txtPPNo.TabIndex = 5
        Me.txtPPNo.Text = ""
        '
        'Label10
        '
        Me.Label10.BackColor = System.Drawing.SystemColors.Control
        Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label10.ForeColor = System.Drawing.Color.Black
        Me.Label10.Location = New System.Drawing.Point(208, 133)
        Me.Label10.Name = "Label10"
        Me.Label10.Size = New System.Drawing.Size(112, 16)
        Me.Label10.TabIndex = 18
        Me.Label10.Text = "Passport #:"
        Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'Label11
        '
        Me.Label11.BackColor = System.Drawing.SystemColors.Control
        Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label11.ForeColor = System.Drawing.Color.Black
        Me.Label11.Location = New System.Drawing.Point(476, 378)
        Me.Label11.Name = "Label11"
        Me.Label11.Size = New System.Drawing.Size(100, 16)
        Me.Label11.TabIndex = 23
        Me.Label11.Text = "Departure Date:"
        Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'Label12
        '
        Me.Label12.BackColor = System.Drawing.SystemColors.Control
        Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label12.ForeColor = System.Drawing.Color.Black
        Me.Label12.Location = New System.Drawing.Point(472, 338)
        Me.Label12.Name = "Label12"
        Me.Label12.Size = New System.Drawing.Size(104, 16)
        Me.Label12.TabIndex = 22
        Me.Label12.Text = "Submission Date:"
        Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'Label13
        '
        Me.Label13.BackColor = System.Drawing.SystemColors.Control
        Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label13.ForeColor = System.Drawing.Color.Black
        Me.Label13.Location = New System.Drawing.Point(476, 298)
        Me.Label13.Name = "Label13"
        Me.Label13.Size = New System.Drawing.Size(100, 16)
        Me.Label13.TabIndex = 21
        Me.Label13.Text = "Medical Date:"
        Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'Label14
        '
        Me.Label14.BackColor = System.Drawing.SystemColors.Control
        Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label14.ForeColor = System.Drawing.Color.Black
        Me.Label14.Location = New System.Drawing.Point(476, 258)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(100, 16)
        Me.Label14.TabIndex = 20
        Me.Label14.Text = "Interview Date:"
        Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtRemarks
        '
        Me.txtRemarks.BackColor = System.Drawing.SystemColors.ControlLightLight
        Me.txtRemarks.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.txtRemarks.ForeColor = System.Drawing.SystemColors.ControlText
        Me.txtRemarks.Location = New System.Drawing.Point(52, 416)
        Me.txtRemarks.MaxLength = 300
        Me.txtRemarks.Multiline = True
        Me.txtRemarks.Name = "txtRemarks"
        Me.txtRemarks.Size = New System.Drawing.Size(664, 128)
        Me.txtRemarks.TabIndex = 17
        Me.txtRemarks.Text = ""
        '
        'Label15
        '
        Me.Label15.BackColor = System.Drawing.SystemColors.Control
        Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label15.ForeColor = System.Drawing.Color.Black
        Me.Label15.Location = New System.Drawing.Point(356, 400)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(56, 16)
        Me.Label15.TabIndex = 25
        Me.Label15.Text = "Remarks"
        Me.Label15.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'dtpIDate
        '
        Me.dtpIDate.Checked = False
        Me.dtpIDate.CustomFormat = "dd-MMM-yyyy"
        Me.dtpIDate.Format = System.Windows.Forms.DateTimePickerFormat.Custom
        Me.dtpIDate.Location = New System.Drawing.Point(580, 256)
        Me.dtpIDate.Name = "dtpIDate"
        Me.dtpIDate.ShowCheckBox = True
        Me.dtpIDate.Size = New System.Drawing.Size(128, 20)
        Me.dtpIDate.TabIndex = 10
        '
        'dtpMDate
        '
        Me.dtpMDate.Checked = False
        Me.dtpMDate.CustomFormat = "dd-MMM-yyyy"
        Me.dtpMDate.Format = System.Windows.Forms.DateTimePickerFormat.Custom
        Me.dtpMDate.Location = New System.Drawing.Point(580, 296)
        Me.dtpMDate.Name = "dtpMDate"
        Me.dtpMDate.ShowCheckBox = True
        Me.dtpMDate.Size = New System.Drawing.Size(128, 20)
        Me.dtpMDate.TabIndex = 12
        '
        'dtpSDate
        '
        Me.dtpSDate.Checked = False
        Me.dtpSDate.CustomFormat = "dd-MMM-yyyy"
        Me.dtpSDate.Format = System.Windows.Forms.DateTimePickerFormat.Custom
        Me.dtpSDate.Location = New System.Drawing.Point(580, 336)
        Me.dtpSDate.Name = "dtpSDate"
        Me.dtpSDate.ShowCheckBox = True
        Me.dtpSDate.Size = New System.Drawing.Size(128, 20)
        Me.dtpSDate.TabIndex = 14
        '
        'dtpDDate
        '
        Me.dtpDDate.Checked = False
        Me.dtpDDate.CustomFormat = "dd-MMM-yyyy"
        Me.dtpDDate.Format = System.Windows.Forms.DateTimePickerFormat.Custom
        Me.dtpDDate.Location = New System.Drawing.Point(580, 376)
        Me.dtpDDate.Name = "dtpDDate"
        Me.dtpDDate.ShowCheckBox = True
        Me.dtpDDate.Size = New System.Drawing.Size(128, 20)
        Me.dtpDDate.TabIndex = 16
        '
        'Label16
        '
        Me.Label16.BackColor = System.Drawing.SystemColors.Control
        Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label16.ForeColor = System.Drawing.Color.Black
        Me.Label16.Location = New System.Drawing.Point(220, 160)
        Me.Label16.Name = "Label16"
        Me.Label16.Size = New System.Drawing.Size(100, 16)
        Me.Label16.TabIndex = 30
        Me.Label16.Text = "Agent:"
        Me.Label16.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtAgent
        '
        Me.txtAgent.BackColor = System.Drawing.Color.White
        Me.txtAgent.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.txtAgent.ForeColor = System.Drawing.SystemColors.ControlText
        Me.txtAgent.Location = New System.Drawing.Point(324, 158)
        Me.txtAgent.Name = "txtAgent"
        Me.txtAgent.ReadOnly = True
        Me.txtAgent.Size = New System.Drawing.Size(216, 20)
        Me.txtAgent.TabIndex = 6
        Me.txtAgent.Text = ""
        '
        'cbxJob
        '
        Me.cbxJob.BackColor = System.Drawing.Color.White
        Me.cbxJob.ForeColor = System.Drawing.SystemColors.ControlText
        Me.cbxJob.Location = New System.Drawing.Point(324, 103)
        Me.cbxJob.Name = "cbxJob"
        Me.cbxJob.Size = New System.Drawing.Size(216, 21)
        Me.cbxJob.TabIndex = 4
        Me.cbxJob.Text = "Job"
        '
        'btnUpdate
        '
        Me.btnUpdate.BackColor = System.Drawing.Color.Chocolate
        Me.btnUpdate.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnUpdate.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.btnUpdate.ForeColor = System.Drawing.Color.Black
        Me.btnUpdate.Location = New System.Drawing.Point(248, 552)
        Me.btnUpdate.Name = "btnUpdate"
        Me.btnUpdate.Size = New System.Drawing.Size(128, 23)
        Me.btnUpdate.TabIndex = 18
        Me.btnUpdate.Text = "&Update"
        '
        'Label17
        '
        Me.Label17.BackColor = System.Drawing.SystemColors.Control
        Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label17.ForeColor = System.Drawing.Color.Black
        Me.Label17.Location = New System.Drawing.Point(208, 215)
        Me.Label17.Name = "Label17"
        Me.Label17.Size = New System.Drawing.Size(112, 16)
        Me.Label17.TabIndex = 36
        Me.Label17.Text = "Interview Location:"
        Me.Label17.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtLocation
        '
        Me.txtLocation.BackColor = System.Drawing.Color.White
        Me.txtLocation.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.txtLocation.ForeColor = System.Drawing.SystemColors.ControlText
        Me.txtLocation.Location = New System.Drawing.Point(324, 213)
        Me.txtLocation.Name = "txtLocation"
        Me.txtLocation.Size = New System.Drawing.Size(216, 20)
        Me.txtLocation.TabIndex = 8
        Me.txtLocation.Text = ""
        '
        'btnClose
        '
        Me.btnClose.BackColor = System.Drawing.Color.Chocolate
        Me.btnClose.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnClose.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.btnClose.ForeColor = System.Drawing.Color.Black
        Me.btnClose.Location = New System.Drawing.Point(392, 552)
        Me.btnClose.Name = "btnClose"
        Me.btnClose.Size = New System.Drawing.Size(128, 23)
        Me.btnClose.TabIndex = 19
        Me.btnClose.Text = "&Close Status"
        '
        'frmStatus
        '
        Me.AcceptButton = Me.btnGo
        Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
        Me.BackColor = System.Drawing.SystemColors.Control
        Me.ClientSize = New System.Drawing.Size(768, 584)
        Me.Controls.Add(Me.txtLocation)
        Me.Controls.Add(Me.Label17)
        Me.Controls.Add(Me.btnClose)
        Me.Controls.Add(Me.btnUpdate)
        Me.Controls.Add(Me.cbxJob)
        Me.Controls.Add(Me.txtAgent)
        Me.Controls.Add(Me.Label16)
        Me.Controls.Add(Me.dtpDDate)
        Me.Controls.Add(Me.dtpSDate)
        Me.Controls.Add(Me.dtpMDate)
        Me.Controls.Add(Me.dtpIDate)
        Me.Controls.Add(Me.Label15)
        Me.Controls.Add(Me.txtRemarks)
        Me.Controls.Add(Me.Label11)
        Me.Controls.Add(Me.Label12)
        Me.Controls.Add(Me.Label13)
        Me.Controls.Add(Me.Label14)
        Me.Controls.Add(Me.txtPPNo)
        Me.Controls.Add(Me.Label10)
        Me.Controls.Add(Me.btnGo)
        Me.Controls.Add(Me.cbxDStatus)
        Me.Controls.Add(Me.cbxVStatus)
        Me.Controls.Add(Me.cbxMStatus)
        Me.Controls.Add(Me.cbxIStatus)

⌨️ 快捷键说明

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