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

📄 frm_bill.vb

📁 application file which contains the notes on Ado.net
💻 VB
📖 第 1 页 / 共 4 页
字号:
        '
        Me.TextBox5.BackColor = System.Drawing.SystemColors.Info
        Me.TextBox5.Location = New System.Drawing.Point(48, 152)
        Me.TextBox5.Name = "TextBox5"
        Me.TextBox5.Size = New System.Drawing.Size(104, 20)
        Me.TextBox5.TabIndex = 19
        Me.TextBox5.Text = ""
        Me.TextBox5.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'ComboBox1
        '
        Me.ComboBox1.BackColor = System.Drawing.SystemColors.Info
        Me.ComboBox1.Location = New System.Drawing.Point(504, 112)
        Me.ComboBox1.Name = "ComboBox1"
        Me.ComboBox1.Size = New System.Drawing.Size(121, 21)
        Me.ComboBox1.TabIndex = 20
        '
        'Label15
        '
        Me.Label15.Location = New System.Drawing.Point(408, 32)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(240, 24)
        Me.Label15.TabIndex = 23
        '
        'Button1
        '
        Me.Button1.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button1.Location = New System.Drawing.Point(304, 416)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(104, 24)
        Me.Button1.TabIndex = 24
        Me.Button1.Text = "Find Slip"
        '
        'Button4
        '
        Me.Button4.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button4.Location = New System.Drawing.Point(8, 16)
        Me.Button4.Name = "Button4"
        Me.Button4.Size = New System.Drawing.Size(104, 24)
        Me.Button4.TabIndex = 27
        Me.Button4.Text = "Delete Slip"
        '
        'Button5
        '
        Me.Button5.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button5.Location = New System.Drawing.Point(528, 416)
        Me.Button5.Name = "Button5"
        Me.Button5.Size = New System.Drawing.Size(104, 24)
        Me.Button5.TabIndex = 28
        Me.Button5.Text = "Cancel"
        '
        'Button6
        '
        Me.Button6.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button6.Location = New System.Drawing.Point(8, 16)
        Me.Button6.Name = "Button6"
        Me.Button6.Size = New System.Drawing.Size(96, 24)
        Me.Button6.TabIndex = 29
        Me.Button6.Text = "Add New Slip"
        '
        'Timer1
        '
        Me.Timer1.Enabled = True
        Me.Timer1.Interval = 1000
        '
        'Label16
        '
        Me.Label16.Location = New System.Drawing.Point(24, 64)
        Me.Label16.Name = "Label16"
        Me.Label16.Size = New System.Drawing.Size(56, 16)
        Me.Label16.TabIndex = 31
        Me.Label16.Text = "Slip No"
        '
        'TextBox6
        '
        Me.TextBox6.BackColor = System.Drawing.SystemColors.InactiveCaptionText
        Me.TextBox6.BorderStyle = System.Windows.Forms.BorderStyle.None
        Me.TextBox6.Location = New System.Drawing.Point(72, 64)
        Me.TextBox6.Name = "TextBox6"
        Me.TextBox6.Size = New System.Drawing.Size(80, 13)
        Me.TextBox6.TabIndex = 32
        Me.TextBox6.Text = ""
        '
        'Button7
        '
        Me.Button7.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button7.Location = New System.Drawing.Point(8, 16)
        Me.Button7.Name = "Button7"
        Me.Button7.Size = New System.Drawing.Size(104, 23)
        Me.Button7.TabIndex = 33
        Me.Button7.Text = "Show Bill"
        '
        'TextBox7
        '
        Me.TextBox7.Location = New System.Drawing.Point(704, 168)
        Me.TextBox7.Name = "TextBox7"
        Me.TextBox7.TabIndex = 34
        Me.TextBox7.Text = ""
        Me.TextBox7.Visible = False
        '
        'TextBox8
        '
        Me.TextBox8.Location = New System.Drawing.Point(704, 192)
        Me.TextBox8.Name = "TextBox8"
        Me.TextBox8.TabIndex = 35
        Me.TextBox8.Text = ""
        Me.TextBox8.Visible = False
        '
        'TextBox9
        '
        Me.TextBox9.Location = New System.Drawing.Point(704, 216)
        Me.TextBox9.Name = "TextBox9"
        Me.TextBox9.TabIndex = 36
        Me.TextBox9.Text = ""
        Me.TextBox9.Visible = False
        '
        'TextBox10
        '
        Me.TextBox10.Location = New System.Drawing.Point(704, 264)
        Me.TextBox10.Name = "TextBox10"
        Me.TextBox10.Size = New System.Drawing.Size(96, 20)
        Me.TextBox10.TabIndex = 37
        Me.TextBox10.Text = ""
        Me.TextBox10.Visible = False
        '
        'TextBox11
        '
        Me.TextBox11.Location = New System.Drawing.Point(704, 240)
        Me.TextBox11.Name = "TextBox11"
        Me.TextBox11.Size = New System.Drawing.Size(104, 20)
        Me.TextBox11.TabIndex = 38
        Me.TextBox11.Text = ""
        Me.TextBox11.Visible = False
        '
        'Button8
        '
        Me.Button8.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button8.Location = New System.Drawing.Point(8, 40)
        Me.Button8.Name = "Button8"
        Me.Button8.Size = New System.Drawing.Size(104, 24)
        Me.Button8.TabIndex = 39
        Me.Button8.Text = "Get Total"
        '
        'TextBox12
        '
        Me.TextBox12.Location = New System.Drawing.Point(712, 144)
        Me.TextBox12.Name = "TextBox12"
        Me.TextBox12.TabIndex = 40
        Me.TextBox12.Text = ""
        '
        'Button9
        '
        Me.Button9.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button9.Location = New System.Drawing.Point(416, 416)
        Me.Button9.Name = "Button9"
        Me.Button9.Size = New System.Drawing.Size(104, 23)
        Me.Button9.TabIndex = 41
        Me.Button9.Text = "Clear Fields"
        '
        'Button10
        '
        Me.Button10.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button10.Enabled = False
        Me.Button10.Location = New System.Drawing.Point(8, 40)
        Me.Button10.Name = "Button10"
        Me.Button10.Size = New System.Drawing.Size(96, 23)
        Me.Button10.TabIndex = 42
        Me.Button10.Text = "Add Slip"
        '
        'Button11
        '
        Me.Button11.BackColor = System.Drawing.SystemColors.ControlLight
        Me.Button11.Enabled = False
        Me.Button11.Location = New System.Drawing.Point(8, 64)
        Me.Button11.Name = "Button11"
        Me.Button11.Size = New System.Drawing.Size(96, 23)
        Me.Button11.TabIndex = 43
        Me.Button11.Text = "Cancel Add Slip"
        '
        'GroupBox1
        '
        Me.GroupBox1.Controls.Add(Me.Button4)
        Me.GroupBox1.Location = New System.Drawing.Point(128, 176)
        Me.GroupBox1.Name = "GroupBox1"
        Me.GroupBox1.Size = New System.Drawing.Size(120, 48)
        Me.GroupBox1.TabIndex = 44
        Me.GroupBox1.TabStop = False
        '
        'GroupBox2
        '
        Me.GroupBox2.Controls.Add(Me.Button6)
        Me.GroupBox2.Controls.Add(Me.Button10)
        Me.GroupBox2.Controls.Add(Me.Button11)
        Me.GroupBox2.Location = New System.Drawing.Point(8, 152)
        Me.GroupBox2.Name = "GroupBox2"
        Me.GroupBox2.Size = New System.Drawing.Size(120, 96)
        Me.GroupBox2.TabIndex = 45
        Me.GroupBox2.TabStop = False
        '
        'TextBox13
        '
        Me.TextBox13.BackColor = System.Drawing.SystemColors.Info
        Me.TextBox13.Enabled = False
        Me.TextBox13.Location = New System.Drawing.Point(104, 24)
        Me.TextBox13.Name = "TextBox13"
        Me.TextBox13.TabIndex = 46
        Me.TextBox13.Text = ""
        '
        'TextBox14
        '
        Me.TextBox14.BackColor = System.Drawing.SystemColors.Info
        Me.TextBox14.Enabled = False
        Me.TextBox14.Location = New System.Drawing.Point(104, 48)
        Me.TextBox14.Name = "TextBox14"
        Me.TextBox14.TabIndex = 47
        Me.TextBox14.Text = ""
        '
        'TextBox15
        '
        Me.TextBox15.BackColor = System.Drawing.SystemColors.Info
        Me.TextBox15.Enabled = False
        Me.TextBox15.Location = New System.Drawing.Point(104, 72)
        Me.TextBox15.Name = "TextBox15"
        Me.TextBox15.TabIndex = 48
        Me.TextBox15.Text = ""
        '
        'TextBox16
        '
        Me.TextBox16.BackColor = System.Drawing.SystemColors.Info
        Me.TextBox16.Enabled = False
        Me.TextBox16.Location = New System.Drawing.Point(104, 96)
        Me.TextBox16.Name = "TextBox16"
        Me.TextBox16.TabIndex = 49
        Me.TextBox16.Text = ""
        '
        'TextBox17
        '
        Me.TextBox17.BackColor = System.Drawing.SystemColors.Info
        Me.TextBox17.Enabled = False
        Me.TextBox17.Location = New System.Drawing.Point(104, 120)
        Me.TextBox17.Name = "TextBox17"
        Me.TextBox17.TabIndex = 50
        Me.TextBox17.Text = ""
        '
        'Label17
        '
        Me.Label17.Location = New System.Drawing.Point(8, 24)
        Me.Label17.Name = "Label17"
        Me.Label17.Size = New System.Drawing.Size(88, 16)
        Me.Label17.TabIndex = 51
        Me.Label17.Text = "Addmission Fee"
        '
        'Label18
        '
        Me.Label18.Location = New System.Drawing.Point(16, 48)
        Me.Label18.Name = "Label18"
        Me.Label18.Size = New System.Drawing.Size(72, 16)
        Me.Label18.TabIndex = 52
        Me.Label18.Text = "Room Rate"
        '
        'Label19
        '
        Me.Label19.Location = New System.Drawing.Point(16, 72)
        Me.Label19.Name = "Label19"
        Me.Label19.Size = New System.Drawing.Size(56, 16)
        Me.Label19.TabIndex = 53
        Me.Label19.Text = "Exam Fee"
        '
        'Label20
        '
        Me.Label20.Location = New System.Drawing.Point(16, 96)
        Me.Label20.Name = "Label20"
        Me.Label20.Size = New System.Drawing.Size(80, 16)
        Me.Label20.TabIndex = 54
        Me.Label20.Text = "Physician Fee"
        '
        'Label21
        '
        Me.Label21.Location = New System.Drawing.Point(16, 120)
        Me.Label21.Name = "Label21"
        Me.Label21.Size = New System.Drawing.Size(64, 16)
        Me.Label21.TabIndex = 55
        Me.Label21.Text = "Drug Cost"
        '
        'GroupBox3
        '
        Me.GroupBox3.Controls.Add(Me.TextBox16)
        Me.GroupBox3.Controls.Add(Me.GroupBox2)
        Me.GroupBox3.Controls.Add(Me.Label17)
        Me.GroupBox3.Controls.Add(Me.Label21)
        Me.GroupBox3.Controls.Add(Me.TextBox14)
        Me.GroupBox3.Controls.Add(Me.TextBox15)
        Me.GroupBox3.Controls.Add(Me.Label19)
        Me.GroupBox3.Controls.Add(Me.Label20)
        Me.GroupBox3.Controls.Add(Me.TextBox13)
        Me.GroupBox3.Controls.Add(Me.Label18)
        Me.GroupBox3.Controls.Add(Me.TextBox17)
        Me.GroupBox3.Controls.Add(Me.GroupBox1)
        Me.GroupBox3.Location = New System.Drawing.Point(192, 152)
        Me.GroupBox3.Name = "GroupBox3"
        Me.GroupBox3.Size = New System.Drawing.Size(256, 256)
        Me.GroupBox3.TabIndex = 56
        Me.GroupBox3.TabStop = False
        '
        'GroupBox4
        '
        Me.GroupBox4.Controls.Add(Me.Button7)
        Me.GroupBox4.Controls.Add(Me.Button8)
        Me.GroupBox4.Location = New System.Drawing.Point(32, 176)
        Me.GroupBox4.Name = "GroupBox4"
        Me.GroupBox4.Size = New System.Drawing.Size(120, 72)
        Me.GroupBox4.TabIndex = 57
        Me.GroupBox4.TabStop = False
        '
        'GroupBox5
        '
        Me.GroupBox5.Controls.Add(Me.TextBox5)
        Me.GroupBox5.Controls.Add(Me.Label13)
        Me.GroupBox5.Controls.Add(Me.ListBox1)
        Me.GroupBox5.Controls.Add(Me.Label11)
        Me.GroupBox5.Controls.Add(Me.Label10)
        Me.GroupBox5.Controls.Add(Me.Label9)
        Me.GroupBox5.Controls.Add(Me.Label8)
        Me.GroupBox5.Controls.Add(Me.Label7)
        Me.GroupBox5.Controls.Add(Me.GroupBox4)
        Me.GroupBox5.Location = New System.Drawing.Point(16, 152)
        Me.GroupBox5.Name = "GroupBox5"
        Me.GroupBox5.Size = New System.Drawing.Size(176, 256)
        Me.GroupBox5.TabIndex = 58
        Me.GroupBox5.TabStop = False

⌨️ 快捷键说明

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