📄 form7.vb
字号:
Imports System.Data
'引入数据库操作类命名空间
Imports System.Data.SqlClient
Public Class Form7
Inherits System.Windows.Forms.Form
Dim tablename As String = "result"
#Region " Windows 窗体设计器生成的代码 "
Public Sub New()
MyBase.New()
'该调用是 Windows 窗体设计器所必需的。
InitializeComponent()
'在 InitializeComponent() 调用之后添加任何初始化
End Sub
'窗体重写 dispose 以清理组件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Windows 窗体设计器所必需的
Private components As System.ComponentModel.IContainer
'注意: 以下过程是 Windows 窗体设计器所必需的
'可以使用 Windows 窗体设计器修改此过程。
'不要使用代码编辑器修改它。
Friend WithEvents Label30 As System.Windows.Forms.Label
Friend WithEvents Label29 As System.Windows.Forms.Label
Friend WithEvents Label28 As System.Windows.Forms.Label
Friend WithEvents Label27 As System.Windows.Forms.Label
Friend WithEvents Label26 As System.Windows.Forms.Label
Friend WithEvents Label25 As System.Windows.Forms.Label
Friend WithEvents Label21 As System.Windows.Forms.Label
Friend WithEvents TextBox20 As System.Windows.Forms.TextBox
Friend WithEvents TextBox19 As System.Windows.Forms.TextBox
Friend WithEvents TextBox18 As System.Windows.Forms.TextBox
Friend WithEvents TextBox17 As System.Windows.Forms.TextBox
Friend WithEvents TextBox16 As System.Windows.Forms.TextBox
Friend WithEvents TextBox15 As System.Windows.Forms.TextBox
Friend WithEvents TextBox14 As System.Windows.Forms.TextBox
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents TextBox9 As System.Windows.Forms.TextBox
Friend WithEvents Label10 As System.Windows.Forms.Label
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents Button6 As System.Windows.Forms.Button
Friend WithEvents Button5 As System.Windows.Forms.Button
Friend WithEvents Button4 As System.Windows.Forms.Button
Friend WithEvents Button3 As System.Windows.Forms.Button
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.Label30 = New System.Windows.Forms.Label
Me.Label29 = New System.Windows.Forms.Label
Me.Label28 = New System.Windows.Forms.Label
Me.Label27 = New System.Windows.Forms.Label
Me.Label26 = New System.Windows.Forms.Label
Me.Label25 = New System.Windows.Forms.Label
Me.Label21 = New System.Windows.Forms.Label
Me.TextBox20 = New System.Windows.Forms.TextBox
Me.TextBox19 = New System.Windows.Forms.TextBox
Me.TextBox18 = New System.Windows.Forms.TextBox
Me.TextBox17 = New System.Windows.Forms.TextBox
Me.TextBox16 = New System.Windows.Forms.TextBox
Me.TextBox15 = New System.Windows.Forms.TextBox
Me.TextBox14 = New System.Windows.Forms.TextBox
Me.GroupBox1 = New System.Windows.Forms.GroupBox
Me.Button2 = New System.Windows.Forms.Button
Me.Button1 = New System.Windows.Forms.Button
Me.TextBox9 = New System.Windows.Forms.TextBox
Me.Label10 = New System.Windows.Forms.Label
Me.ComboBox1 = New System.Windows.Forms.ComboBox
Me.Label9 = New System.Windows.Forms.Label
Me.GroupBox2 = New System.Windows.Forms.GroupBox
Me.Button6 = New System.Windows.Forms.Button
Me.Button5 = New System.Windows.Forms.Button
Me.Button4 = New System.Windows.Forms.Button
Me.Button3 = New System.Windows.Forms.Button
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.SuspendLayout()
'
'Label30
'
Me.Label30.Location = New System.Drawing.Point(32, 256)
Me.Label30.Name = "Label30"
Me.Label30.Size = New System.Drawing.Size(56, 16)
Me.Label30.TabIndex = 51
Me.Label30.Text = "认识实习"
'
'Label29
'
Me.Label29.Location = New System.Drawing.Point(32, 216)
Me.Label29.Name = "Label29"
Me.Label29.Size = New System.Drawing.Size(56, 16)
Me.Label29.TabIndex = 50
Me.Label29.Text = "课程设计"
'
'Label28
'
Me.Label28.Location = New System.Drawing.Point(40, 176)
Me.Label28.Name = "Label28"
Me.Label28.Size = New System.Drawing.Size(32, 16)
Me.Label28.TabIndex = 49
Me.Label28.Text = "体育"
'
'Label27
'
Me.Label27.Location = New System.Drawing.Point(8, 136)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(96, 16)
Me.Label27.TabIndex = 48
Me.Label27.Text = "计算机组成原理"
'
'Label26
'
Me.Label26.Location = New System.Drawing.Point(32, 96)
Me.Label26.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(48, 16)
Me.Label26.TabIndex = 47
Me.Label26.Text = "数据库"
'
'Label25
'
Me.Label25.Location = New System.Drawing.Point(24, 56)
Me.Label25.Name = "Label25"
Me.Label25.Size = New System.Drawing.Size(56, 16)
Me.Label25.TabIndex = 46
Me.Label25.Text = "企业管理"
'
'Label21
'
Me.Label21.Location = New System.Drawing.Point(24, 16)
Me.Label21.Name = "Label21"
Me.Label21.Size = New System.Drawing.Size(72, 16)
Me.Label21.TabIndex = 45
Me.Label21.Text = "英语(四)"
'
'TextBox20
'
Me.TextBox20.Location = New System.Drawing.Point(128, 248)
Me.TextBox20.Name = "TextBox20"
Me.TextBox20.Size = New System.Drawing.Size(104, 21)
Me.TextBox20.TabIndex = 58
Me.TextBox20.Text = ""
'
'TextBox19
'
Me.TextBox19.Location = New System.Drawing.Point(128, 208)
Me.TextBox19.Name = "TextBox19"
Me.TextBox19.Size = New System.Drawing.Size(104, 21)
Me.TextBox19.TabIndex = 57
Me.TextBox19.Text = ""
'
'TextBox18
'
Me.TextBox18.Location = New System.Drawing.Point(128, 168)
Me.TextBox18.Name = "TextBox18"
Me.TextBox18.Size = New System.Drawing.Size(104, 21)
Me.TextBox18.TabIndex = 56
Me.TextBox18.Text = ""
'
'TextBox17
'
Me.TextBox17.Location = New System.Drawing.Point(128, 128)
Me.TextBox17.Name = "TextBox17"
Me.TextBox17.Size = New System.Drawing.Size(104, 21)
Me.TextBox17.TabIndex = 55
Me.TextBox17.Text = ""
'
'TextBox16
'
Me.TextBox16.Location = New System.Drawing.Point(128, 88)
Me.TextBox16.Name = "TextBox16"
Me.TextBox16.Size = New System.Drawing.Size(104, 21)
Me.TextBox16.TabIndex = 54
Me.TextBox16.Text = ""
'
'TextBox15
'
Me.TextBox15.Location = New System.Drawing.Point(128, 48)
Me.TextBox15.Name = "TextBox15"
Me.TextBox15.Size = New System.Drawing.Size(104, 21)
Me.TextBox15.TabIndex = 53
Me.TextBox15.Text = ""
'
'TextBox14
'
Me.TextBox14.Location = New System.Drawing.Point(128, 8)
Me.TextBox14.Name = "TextBox14"
Me.TextBox14.Size = New System.Drawing.Size(104, 21)
Me.TextBox14.TabIndex = 52
Me.TextBox14.Text = ""
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.Button2)
Me.GroupBox1.Controls.Add(Me.Button1)
Me.GroupBox1.Controls.Add(Me.TextBox9)
Me.GroupBox1.Controls.Add(Me.Label10)
Me.GroupBox1.Controls.Add(Me.ComboBox1)
Me.GroupBox1.Controls.Add(Me.Label9)
Me.GroupBox1.Location = New System.Drawing.Point(248, 8)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(152, 264)
Me.GroupBox1.TabIndex = 59
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "查询所要修改的成绩"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(48, 208)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(56, 24)
Me.Button2.TabIndex = 5
Me.Button2.Text = "刷新"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(48, 160)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(56, 24)
Me.Button1.TabIndex = 4
Me.Button1.Text = "查询"
'
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -