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

📄 frm_outpat.vb

📁 application file which contains the notes on Ado.net
💻 VB
📖 第 1 页 / 共 5 页
字号:
        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 + -