📄 frmstatus.vb
字号:
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 + -