📄 frm_outpat.vb
字号:
Me.TextBox9.BackColor = System.Drawing.SystemColors.Info
Me.TextBox9.Location = New System.Drawing.Point(80, 160)
Me.TextBox9.Name = "TextBox9"
Me.TextBox9.Size = New System.Drawing.Size(88, 20)
Me.TextBox9.TabIndex = 22
Me.TextBox9.Text = ""
'
'Label15
'
Me.Label15.Location = New System.Drawing.Point(224, 136)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(56, 16)
Me.Label15.TabIndex = 21
Me.Label15.Text = "Religon"
'
'Label14
'
Me.Label14.Location = New System.Drawing.Point(16, 168)
Me.Label14.Name = "Label14"
Me.Label14.Size = New System.Drawing.Size(64, 16)
Me.Label14.TabIndex = 20
Me.Label14.Text = "Nationality"
'
'Label13
'
Me.Label13.Location = New System.Drawing.Point(480, 88)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(56, 16)
Me.Label13.TabIndex = 19
Me.Label13.Text = "Symptons"
'
'TextBox8
'
Me.TextBox8.BackColor = System.Drawing.SystemColors.Info
Me.TextBox8.Location = New System.Drawing.Point(496, 112)
Me.TextBox8.Multiline = True
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.Size = New System.Drawing.Size(120, 72)
Me.TextBox8.TabIndex = 18
Me.TextBox8.Text = ""
Me.ToolTip1.SetToolTip(Me.TextBox8, "Enter the patients symptons here")
'
'TextBox7
'
Me.TextBox7.BackColor = System.Drawing.SystemColors.Info
Me.TextBox7.Location = New System.Drawing.Point(320, 96)
Me.TextBox7.Name = "TextBox7"
Me.TextBox7.Size = New System.Drawing.Size(32, 20)
Me.TextBox7.TabIndex = 17
Me.TextBox7.Text = ""
'
'Label11
'
Me.Label11.Location = New System.Drawing.Point(288, 104)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(40, 16)
Me.Label11.TabIndex = 16
Me.Label11.Text = "Age"
'
'ComboBox3
'
Me.ComboBox3.BackColor = System.Drawing.SystemColors.Info
Me.ComboBox3.Items.AddRange(New Object() {"Single", "Married", "Widowed", "Divorced"})
Me.ComboBox3.Location = New System.Drawing.Point(520, 56)
Me.ComboBox3.Name = "ComboBox3"
Me.ComboBox3.Size = New System.Drawing.Size(88, 21)
Me.ComboBox3.TabIndex = 15
'
'Label10
'
Me.Label10.Location = New System.Drawing.Point(472, 64)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(40, 16)
Me.Label10.TabIndex = 14
Me.Label10.Text = "Status"
'
'ComboBox1
'
Me.ComboBox1.BackColor = System.Drawing.SystemColors.Info
Me.ComboBox1.Items.AddRange(New Object() {"Male", "Female"})
Me.ComboBox1.Location = New System.Drawing.Point(520, 24)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(88, 21)
Me.ComboBox1.TabIndex = 13
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(472, 32)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(48, 16)
Me.Label7.TabIndex = 12
Me.Label7.Text = "Gender"
'
'TextBox5
'
Me.TextBox5.BackColor = System.Drawing.SystemColors.Info
Me.TextBox5.Location = New System.Drawing.Point(120, 128)
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.TabIndex = 11
Me.TextBox5.Text = ""
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(8, 136)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(112, 16)
Me.Label6.TabIndex = 10
Me.Label6.Text = "BirthDate(mm/dd/yy)"
'
'TextBox4
'
Me.TextBox4.BackColor = System.Drawing.SystemColors.Info
Me.TextBox4.Location = New System.Drawing.Point(104, 96)
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Size = New System.Drawing.Size(176, 20)
Me.TextBox4.TabIndex = 9
Me.TextBox4.Text = ""
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(8, 104)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(104, 16)
Me.Label5.TabIndex = 8
Me.Label5.Text = "Phone(Home/Cell)"
'
'TextBox3
'
Me.TextBox3.BackColor = System.Drawing.SystemColors.Info
Me.TextBox3.Location = New System.Drawing.Point(64, 64)
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Size = New System.Drawing.Size(384, 20)
Me.TextBox3.TabIndex = 7
Me.TextBox3.Text = ""
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(8, 72)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(48, 16)
Me.Label4.TabIndex = 6
Me.Label4.Text = "Address"
'
'TextBox2
'
Me.TextBox2.BackColor = System.Drawing.SystemColors.Info
Me.TextBox2.Location = New System.Drawing.Point(208, 32)
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(240, 20)
Me.TextBox2.TabIndex = 5
Me.TextBox2.Text = ""
'
'TextBox1
'
Me.TextBox1.BackColor = System.Drawing.SystemColors.Info
Me.TextBox1.Location = New System.Drawing.Point(104, 32)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.TabIndex = 4
Me.TextBox1.Text = ""
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(176, 168)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(40, 16)
Me.Label9.TabIndex = 11
Me.Label9.Text = "Ward"
'
'ComboBox2
'
Me.ComboBox2.BackColor = System.Drawing.SystemColors.Info
Me.ComboBox2.Location = New System.Drawing.Point(216, 160)
Me.ComboBox2.Name = "ComboBox2"
Me.ComboBox2.Size = New System.Drawing.Size(104, 21)
Me.ComboBox2.TabIndex = 13
'
'Label12
'
Me.Label12.Location = New System.Drawing.Point(320, 168)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(56, 16)
Me.Label12.TabIndex = 14
Me.Label12.Text = "Physician"
'
'ComboBox4
'
Me.ComboBox4.BackColor = System.Drawing.SystemColors.Info
Me.ComboBox4.Location = New System.Drawing.Point(376, 160)
Me.ComboBox4.Name = "ComboBox4"
Me.ComboBox4.Size = New System.Drawing.Size(104, 21)
Me.ComboBox4.TabIndex = 15
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.Button13)
Me.GroupBox2.Controls.Add(Me.Button12)
Me.GroupBox2.Controls.Add(Me.Button10)
Me.GroupBox2.Controls.Add(Me.GroupBox8)
Me.GroupBox2.Controls.Add(Me.Button11)
Me.GroupBox2.Controls.Add(Me.Button8)
Me.GroupBox2.Controls.Add(Me.Button7)
Me.GroupBox2.Controls.Add(Me.Button6)
Me.GroupBox2.Controls.Add(Me.Button5)
Me.GroupBox2.Controls.Add(Me.GroupBox7)
Me.GroupBox2.Controls.Add(Me.RadioButton5)
Me.GroupBox2.Controls.Add(Me.GroupBox6)
Me.GroupBox2.Controls.Add(Me.GroupBox5)
Me.GroupBox2.Controls.Add(Me.RadioButton2)
Me.GroupBox2.Controls.Add(Me.RadioButton1)
Me.GroupBox2.Controls.Add(Me.GroupBox4)
Me.GroupBox2.Controls.Add(Me.GroupBox3)
Me.GroupBox2.Controls.Add(Me.TextBox11)
Me.GroupBox2.Controls.Add(Me.Label16)
Me.GroupBox2.Location = New System.Drawing.Point(8, 272)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(632, 304)
Me.GroupBox2.TabIndex = 5
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Billing Details"
Me.ToolTip1.SetToolTip(Me.GroupBox2, "Patients Billing Details, all of his transactions are made here")
'
'Button13
'
Me.Button13.BackColor = System.Drawing.SystemColors.ControlLight
Me.Button13.Location = New System.Drawing.Point(512, 224)
Me.Button13.Name = "Button13"
Me.Button13.Size = New System.Drawing.Size(96, 23)
Me.Button13.TabIndex = 26
Me.Button13.Text = "Delete Now"
'
'Button12
'
Me.Button12.BackColor = System.Drawing.SystemColors.ControlLight
Me.Button12.Location = New System.Drawing.Point(512, 192)
Me.Button12.Name = "Button12"
Me.Button12.Size = New System.Drawing.Size(96, 23)
Me.Button12.TabIndex = 25
Me.Button12.Text = "Edit Now"
'
'Button10
'
Me.Button10.BackColor = System.Drawing.SystemColors.ControlLight
Me.Button10.Location = New System.Drawing.Point(512, 160)
Me.Button10.Name = "Button10"
Me.Button10.Size = New System.Drawing.Size(96, 24)
Me.Button10.TabIndex = 24
Me.Button10.Text = "Add Now"
'
'GroupBox8
'
Me.GroupBox8.Controls.Add(Me.RadioButton4)
Me.GroupBox8.Controls.Add(Me.RadioButton3)
Me.GroupBox8.Location = New System.Drawing.Point(208, 0)
Me.GroupBox8.Name = "GroupBox8"
Me.GroupBox8.Size = New System.Drawing.Size(152, 40)
Me.GroupBox8.TabIndex = 23
Me.GroupBox8.TabStop = False
'
'RadioButton4
'
Me.RadioButton4.FlatStyle = System.Windows.Forms.FlatStyle.System
Me.RadioButton4.Location = New System.Drawing.Point(72, 16)
Me.RadioButton4.Name = "RadioButton4"
Me.RadioButton4.Size = New System.Drawing.Size(64, 16)
Me.RadioButton4.TabIndex = 12
Me.RadioButton4.Text = "Company"
'
'RadioButton3
'
Me.RadioButton3.FlatStyle = System.Windows.Forms.FlatStyle.System
Me.RadioButton3.Location = New System.Drawing.Point(8, 16)
Me.RadioButton3.Name = "RadioButton3"
Me.RadioButton3.Size = New System.Drawing.Size(64, 16)
Me.RadioButton3.TabIndex = 11
Me.RadioButton3.Text = "Private"
'
'Button11
'
Me.Button11.BackColor = System.Drawing.SystemColors.ControlLight
Me.Button11.Location = New System.Drawing.Point(512, 272)
Me.Button11.Name = "Button11"
Me.Button11.Size = New System.Drawing.Size(72, 23)
Me.Button11.TabIndex = 22
Me.Button11.Text = "Get Patient"
'
'Button9
'
Me.Button9.BackColor = System.Drawing.SystemColors.ControlLight
Me.Button9.Location = New System.Drawing.Point(160, 584)
Me.Button9.Name = "Button9"
Me.Button9.Size = New System.Drawing.Size(80, 23)
Me.Button9.TabIndex = 20
Me.Button9.Text = "View Report"
'
'Button8
'
Me.Button8.BackColor = System.Drawing.SystemColors.ControlLight
Me.Button8.Location = New System.Drawing.Point(400, 192)
Me.Button8.Name = "Button8"
Me.Button8.Size = New System.Drawing.Size(96, 23)
Me.Button8.TabIndex = 19
Me.Button8.Text = "Edit Slip"
'
'Button7
'
Me.Button7.BackColor = System.Drawing.SystemColors.ControlLight
Me.Button7.Location = New System.Drawing.Point(400, 224)
Me.Button7.Name = "Button7"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -