VB.Net 设计器错误(类型 'String' 的值无法转换为 'System.Windows.Forms.DataGridViewTextBoxColumn' 。)-6ren

VB.Net 设计器错误(类型 'String' 的值无法转换为 'System.Windows.Forms.DataGridViewTextBoxColumn' 。)

转载作者：行者123 更新时间：2023-12-02 01:06:00

我在名为 frmTeacherload 的表单上有一个数据网格，当我运行代码时突然出现此错误“字符串”类型的值无法转换为“System.Windows.Forms.DataGridViewTextBoxColumn”。关于vb的设计器。这是我的代码人员，我希望你能帮助我提前谢谢

设计师代码 _ 部分类 frmTeacherload 继承 System.Windows.Forms.Form

'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
    Try
        If disposing AndAlso components IsNot Nothing Then
            components.Dispose()
        End If
    Finally
        MyBase.Dispose(disposing)
    End Try
End Sub

'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer

'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.  
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
    Me.components = New System.ComponentModel.Container()
    Me.Label1 = New System.Windows.Forms.Label()
    Me.Label2 = New System.Windows.Forms.Label()
    Me.ComboBox1 = New System.Windows.Forms.ComboBox()
    Me.lblBack = New System.Windows.Forms.LinkLabel()
    Me.Panel1 = New System.Windows.Forms.Panel()
    Me.DataGridView2 = New System.Windows.Forms.DataGridView()
    Me.Name = New System.Windows.Forms.DataGridViewTextBoxColumn()
    Me.TblteacherloadDataSet2 = New WindowsApplication1.tblteacherloadDataSet2()
    Me.TblteacherloadDataSet1 = New WindowsApplication1.tblteacherloadDataSet1()
    Me.TblteacherloadTableAdapter = New WindowsApplication1.tblteacherloadDataSet1TableAdapters.tblteacherloadTableAdapter()
    Me.TextBox1 = New System.Windows.Forms.TextBox()
    Me.Label3 = New System.Windows.Forms.Label()
    Me.Label4 = New System.Windows.Forms.Label()
    Me.TextBox2 = New System.Windows.Forms.TextBox()
    Me.Label5 = New System.Windows.Forms.Label()
    Me.TextBox3 = New System.Windows.Forms.TextBox()
    Me.Label6 = New System.Windows.Forms.Label()
    Me.TextBox4 = New System.Windows.Forms.TextBox()
    Me.Label7 = New System.Windows.Forms.Label()
    Me.TextBox5 = New System.Windows.Forms.TextBox()
    Me.Label8 = New System.Windows.Forms.Label()
    Me.TextBox6 = New System.Windows.Forms.TextBox()
    Me.Label9 = New System.Windows.Forms.Label()
    Me.TextBox7 = New System.Windows.Forms.TextBox()
    Me.Button1 = New System.Windows.Forms.Button()
    Me.TblteacherloadTableAdapter1 = New WindowsApplication1.tblteacherloadDataSet2TableAdapters.tblteacherloadTableAdapter()
    Me.TblteacherloadDataSet3 = New WindowsApplication1.tblteacherloadDataSet3()
    Me.BindingSource1 = New System.Windows.Forms.BindingSource(Me.components)
    Me.TblteacherloadTableAdapter2 = New WindowsApplication1.tblteacherloadDataSet3TableAdapters.tblteacherloadTableAdapter()
    Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
    Me.NameDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
    Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
    Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewTextBoxColumn()
    Me.DataGridViewTextBoxColumn4 = New System.Windows.Forms.DataGridViewTextBoxColumn()
    Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn()
    Me.DataGridViewTextBoxColumn6 = New System.Windows.Forms.DataGridViewTextBoxColumn()
    CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).BeginInit()
    CType(Me.TblteacherloadDataSet2, System.ComponentModel.ISupportInitialize).BeginInit()
    CType(Me.TblteacherloadDataSet1, System.ComponentModel.ISupportInitialize).BeginInit()
    CType(Me.TblteacherloadDataSet3, System.ComponentModel.ISupportInitialize).BeginInit()
    CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
    Me.SuspendLayout()
    '
    'Label1
    '
    Me.Label1.AutoSize = True
    Me.Label1.Font = New System.Drawing.Font("Lucida Calligraphy", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
    Me.Label1.Location = New System.Drawing.Point(610, 18)
    Me.Label1.Name = "Label1"
    Me.Label1.Size = New System.Drawing.Size(217, 31)
    Me.Label1.TabIndex = 0
    Me.Label1.Text = "Teacher's Load"
    '
    'Label2
    '
    Me.Label2.AutoSize = True
    Me.Label2.Location = New System.Drawing.Point(22, 74)
    Me.Label2.Name = "Label2"
    Me.Label2.Size = New System.Drawing.Size(125, 13)
    Me.Label2.TabIndex = 1
    Me.Label2.Text = "Choose Teachers Name:"
    '
    'ComboBox1
    '
    Me.ComboBox1.FormattingEnabled = True
    Me.ComboBox1.Location = New System.Drawing.Point(149, 70)
    Me.ComboBox1.Name = "ComboBox1"
    Me.ComboBox1.Size = New System.Drawing.Size(121, 21)
    Me.ComboBox1.TabIndex = 2
    '
    'lblBack
    '
    Me.lblBack.AutoSize = True
    Me.lblBack.Location = New System.Drawing.Point(22, 30)
    Me.lblBack.Name = "lblBack"
    Me.lblBack.Size = New System.Drawing.Size(50, 13)
    Me.lblBack.TabIndex = 94
    Me.lblBack.TabStop = True
    Me.lblBack.Text = "<<<Back"
    '
    'Panel1
    '
    Me.Panel1.BackColor = System.Drawing.Color.Black
    Me.Panel1.Location = New System.Drawing.Point(549, 52)
    Me.Panel1.Name = "Panel1"
    Me.Panel1.Size = New System.Drawing.Size(272, 10)
    Me.Panel1.TabIndex = 95
    '
    'DataGridView2
    '
    Me.DataGridView2.AutoGenerateColumns = False
    Me.DataGridView2.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
    Me.DataGridView2.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.Name, Me.DataGridViewTextBoxColumn1, Me.NameDataGridViewTextBoxColumn, Me.DataGridViewTextBoxColumn2, Me.DataGridViewTextBoxColumn3, Me.DataGridViewTextBoxColumn4, Me.DataGridViewTextBoxColumn5, Me.DataGridViewTextBoxColumn6})
    Me.DataGridView2.DataSource = Me.BindingSource1
    Me.DataGridView2.Location = New System.Drawing.Point(45, 97)
    Me.DataGridView2.Name = "DataGridView2"
    Me.DataGridView2.Size = New System.Drawing.Size(753, 178)
    Me.DataGridView2.TabIndex = 96
    '
    'Name
    '
    Me.Name.DataPropertyName = "Name"
    Me.Name.HeaderText = "Name"
    Me.Name.Name = "Name"
    '
    'TblteacherloadDataSet2
    '
    Me.TblteacherloadDataSet2.DataSetName = "tblteacherloadDataSet2"
    Me.TblteacherloadDataSet2.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
    '
    'TblteacherloadDataSet1
    '
    Me.TblteacherloadDataSet1.DataSetName = "tblteacherloadDataSet1"
    Me.TblteacherloadDataSet1.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
    '
    'TblteacherloadTableAdapter
    '
    Me.TblteacherloadTableAdapter.ClearBeforeFill = True
    '
    'TextBox1
    '
    Me.TextBox1.Location = New System.Drawing.Point(123, 303)
    Me.TextBox1.Name = "TextBox1"
    Me.TextBox1.Size = New System.Drawing.Size(100, 20)
    Me.TextBox1.TabIndex = 97
    '
    'Label3
    '
    Me.Label3.AutoSize = True
    Me.Label3.Location = New System.Drawing.Point(33, 306)
    Me.Label3.Name = "Label3"
    Me.Label3.Size = New System.Drawing.Size(18, 13)
    Me.Label3.TabIndex = 98
    Me.Label3.Text = "ID"
    '
    'Label4
    '
    Me.Label4.AutoSize = True
    Me.Label4.Location = New System.Drawing.Point(33, 351)
    Me.Label4.Name = "Label4"
    Me.Label4.Size = New System.Drawing.Size(85, 13)
    Me.Label4.TabIndex = 100
    Me.Label4.Text = "Teacher's Name"
    '
    'TextBox2
    '
    Me.TextBox2.Location = New System.Drawing.Point(123, 348)
    Me.TextBox2.Name = "TextBox2"
    Me.TextBox2.Size = New System.Drawing.Size(100, 20)
    Me.TextBox2.TabIndex = 99
    '
    'Label5
    '
    Me.Label5.AutoSize = True
    Me.Label5.Location = New System.Drawing.Point(337, 310)
    Me.Label5.Name = "Label5"
    Me.Label5.Size = New System.Drawing.Size(43, 13)
    Me.Label5.TabIndex = 104
    Me.Label5.Text = "Subject"
    '
    'TextBox3
    '
    Me.TextBox3.Location = New System.Drawing.Point(123, 393)
    Me.TextBox3.Name = "TextBox3"
    Me.TextBox3.Size = New System.Drawing.Size(100, 20)
    Me.TextBox3.TabIndex = 103
    '
    'Label6
    '
    Me.Label6.AutoSize = True
    Me.Label6.Location = New System.Drawing.Point(33, 394)
    Me.Label6.Name = "Label6"
    Me.Label6.Size = New System.Drawing.Size(43, 13)
    Me.Label6.TabIndex = 102
    Me.Label6.Text = "Section"
    '
    'TextBox4
    '
    Me.TextBox4.Location = New System.Drawing.Point(427, 303)
    Me.TextBox4.Name = "TextBox4"
    Me.TextBox4.Size = New System.Drawing.Size(100, 20)
    Me.TextBox4.TabIndex = 101
    '
    'Label7
    '
    Me.Label7.AutoSize = True
    Me.Label7.Location = New System.Drawing.Point(337, 393)
    Me.Label7.Name = "Label7"
    Me.Label7.Size = New System.Drawing.Size(30, 13)
    Me.Label7.TabIndex = 108
    Me.Label7.Text = "Time"
    '
    'TextBox5
    '
    Me.TextBox5.Location = New System.Drawing.Point(427, 345)
    Me.TextBox5.Name = "TextBox5"
    Me.TextBox5.Size = New System.Drawing.Size(100, 20)
    Me.TextBox5.TabIndex = 107
    '
    'Label8
    '
    Me.Label8.AutoSize = True
    Me.Label8.Location = New System.Drawing.Point(337, 348)
    Me.Label8.Name = "Label8"
    Me.Label8.Size = New System.Drawing.Size(26, 13)
    Me.Label8.TabIndex = 106
    Me.Label8.Text = "Day"
    '
    'TextBox6
    '
    Me.TextBox6.Location = New System.Drawing.Point(427, 394)
    Me.TextBox6.Name = "TextBox6"
    Me.TextBox6.Size = New System.Drawing.Size(100, 20)
    Me.TextBox6.TabIndex = 105
    '
    'Label9
    '
    Me.Label9.AutoSize = True
    Me.Label9.Location = New System.Drawing.Point(588, 306)
    Me.Label9.Name = "Label9"
    Me.Label9.Size = New System.Drawing.Size(35, 13)
    Me.Label9.TabIndex = 112
    Me.Label9.Text = "Room"
    '
    'TextBox7
    '
    Me.TextBox7.Location = New System.Drawing.Point(678, 303)
    Me.TextBox7.Name = "TextBox7"
    Me.TextBox7.Size = New System.Drawing.Size(100, 20)
    Me.TextBox7.TabIndex = 111
    '
    'Button1
    '
    Me.Button1.Location = New System.Drawing.Point(591, 435)
    Me.Button1.Name = "Button1"
    Me.Button1.Size = New System.Drawing.Size(94, 30)
    Me.Button1.TabIndex = 113
    Me.Button1.Text = "SUBMIT"
    Me.Button1.UseVisualStyleBackColor = True
    '
    'TblteacherloadTableAdapter1
    '
    Me.TblteacherloadTableAdapter1.ClearBeforeFill = True
    '
    'TblteacherloadDataSet3
    '
    Me.TblteacherloadDataSet3.DataSetName = "tblteacherloadDataSet3"
    Me.TblteacherloadDataSet3.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
    '
    'BindingSource1
    '
    Me.BindingSource1.DataMember = "tblteacherload"
    Me.BindingSource1.DataSource = Me.TblteacherloadDataSet3
    '
    'TblteacherloadTableAdapter2
    '
    Me.TblteacherloadTableAdapter2.ClearBeforeFill = True
    '
    'DataGridViewTextBoxColumn1
    '
    Me.DataGridViewTextBoxColumn1.DataPropertyName = "ID"
    Me.DataGridViewTextBoxColumn1.HeaderText = "ID"
    Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
    '
    'NameDataGridViewTextBoxColumn
    '
    Me.NameDataGridViewTextBoxColumn.DataPropertyName = "Name"
    Me.NameDataGridViewTextBoxColumn.HeaderText = "Name"
    Me.NameDataGridViewTextBoxColumn.Name = "NameDataGridViewTextBoxColumn"
    '
    'DataGridViewTextBoxColumn2
    '
    Me.DataGridViewTextBoxColumn2.DataPropertyName = "Section"
    Me.DataGridViewTextBoxColumn2.HeaderText = "Section"
    Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
    '
    'DataGridViewTextBoxColumn3
    '
    Me.DataGridViewTextBoxColumn3.DataPropertyName = "Subject"
    Me.DataGridViewTextBoxColumn3.HeaderText = "Subject"
    Me.DataGridViewTextBoxColumn3.Name = "DataGridViewTextBoxColumn3"
    '
    'DataGridViewTextBoxColumn4
    '
    Me.DataGridViewTextBoxColumn4.DataPropertyName = "Day"
    Me.DataGridViewTextBoxColumn4.HeaderText = "Day"
    Me.DataGridViewTextBoxColumn4.Name = "DataGridViewTextBoxColumn4"
    '
    'DataGridViewTextBoxColumn5
    '
    Me.DataGridViewTextBoxColumn5.DataPropertyName = "Time"
    Me.DataGridViewTextBoxColumn5.HeaderText = "Time"
    Me.DataGridViewTextBoxColumn5.Name = "DataGridViewTextBoxColumn5"
    '
    'DataGridViewTextBoxColumn6
    '
    Me.DataGridViewTextBoxColumn6.DataPropertyName = "Room"
    Me.DataGridViewTextBoxColumn6.HeaderText = "Room"
    Me.DataGridViewTextBoxColumn6.Name = "DataGridViewTextBoxColumn6"
    '
    'frmTeacherload
    '
    Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
    Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
    Me.ClientSize = New System.Drawing.Size(839, 494)
    Me.Controls.Add(Me.Button1)
    Me.Controls.Add(Me.Label9)
    Me.Controls.Add(Me.TextBox7)
    Me.Controls.Add(Me.Label7)
    Me.Controls.Add(Me.TextBox5)
    Me.Controls.Add(Me.Label8)
    Me.Controls.Add(Me.TextBox6)
    Me.Controls.Add(Me.Label5)
    Me.Controls.Add(Me.TextBox3)
    Me.Controls.Add(Me.Label6)
    Me.Controls.Add(Me.TextBox4)
    Me.Controls.Add(Me.Label4)
    Me.Controls.Add(Me.TextBox2)
    Me.Controls.Add(Me.Label3)
    Me.Controls.Add(Me.TextBox1)
    Me.Controls.Add(Me.DataGridView2)
    Me.Controls.Add(Me.Panel1)
    Me.Controls.Add(Me.lblBack)
    Me.Controls.Add(Me.ComboBox1)
    Me.Controls.Add(Me.Label2)
    Me.Controls.Add(Me.Label1)
    Me.Name = "frmTeacherload"
    Me.Text = "First Books Learning Center"
    CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).EndInit()
    CType(Me.TblteacherloadDataSet2, System.ComponentModel.ISupportInitialize).EndInit()
    CType(Me.TblteacherloadDataSet1, System.ComponentModel.ISupportInitialize).EndInit()
    CType(Me.TblteacherloadDataSet3, System.ComponentModel.ISupportInitialize).EndInit()
    CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
    Me.ResumeLayout(False)
    Me.PerformLayout()

End Sub
Friend WithEvents frmTeacherload As System.Windows.Forms.Form
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
Friend WithEvents lblBack As System.Windows.Forms.LinkLabel
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents DataGridView2 As System.Windows.Forms.DataGridView
Friend WithEvents TblteacherloadDataSet1 As WindowsApplication1.tblteacherloadDataSet1
Friend WithEvents TblteacherloadBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TblteacherloadTableAdapter As WindowsApplication1.tblteacherloadDataSet1TableAdapters.tblteacherloadTableAdapter
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents TextBox3 As System.Windows.Forms.TextBox
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents TextBox4 As System.Windows.Forms.TextBox
Friend WithEvents Label7 As System.Windows.Forms.Label
Friend WithEvents TextBox5 As System.Windows.Forms.TextBox
Friend WithEvents Label8 As System.Windows.Forms.Label
Friend WithEvents TextBox6 As System.Windows.Forms.TextBox
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents TextBox7 As System.Windows.Forms.TextBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents TblteacherloadDataSet2 As WindowsApplication1.tblteacherloadDataSet2
Friend WithEvents TblteacherloadBindingSource1 As System.Windows.Forms.BindingSource
Friend WithEvents TblteacherloadTableAdapter1 As WindowsApplication1.tblteacherloadDataSet2TableAdapters.tblteacherloadTableAdapter
Friend WithEvents IDDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
Shadows WithEvents Name As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents SectionDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents SubjectDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DayDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents TimeDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents RoomDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents TblteacherloadDataSet3 As WindowsApplication1.tblteacherloadDataSet3
Friend WithEvents BindingSource1 As System.Windows.Forms.BindingSource
Friend WithEvents TblteacherloadTableAdapter2 As WindowsApplication1.tblteacherloadDataSet3TableAdapters.tblteacherloadTableAdapter
Friend WithEvents DataGridViewTextBoxColumn1 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents NameDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn2 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn3 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn4 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn5 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn6 As System.Windows.Forms.DataGridViewTextBoxColumn

下课

frmTeacherload

Public Class frmTeacherload
Dim query As String
Dim y As String = "Provider=Microsoft.ACE.OLEDB.12.0;Password='';User ID=;Data Source='" & Application.StartupPath & "/tblteacherload.accdb';"
Dim database As New clsDatabase.OleDBase(y)
Private Sub lblBack_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles lblBack.LinkClicked
    frmEnrollment.Show()
    Me.Hide()
End Sub

Private Sub frmTeacherload_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    'TODO: This line of code loads data into the 'TblteacherloadDataSet3.tblteacherload' table. You can move, or remove it, as needed.
    Me.TblteacherloadTableAdapter2.Fill(Me.TblteacherloadDataSet3.tblteacherload)
    'TODO: This line of code loads data into the 'TblteacherloadDataSet2.tblteacherload' table. You can move, or remove it, as needed.
    Me.TblteacherloadTableAdapter1.Fill(Me.TblteacherloadDataSet2.tblteacherload)
    'TODO: This line of code loads data into the 'TblteacherloadDataSet1.tblteacherload' table. You can move, or remove it, as needed.
    Me.TblteacherloadTableAdapter.Fill(Me.TblteacherloadDataSet1.tblteacherload)

End Sub

Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click

End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

End Sub
Private Sub fillDataGridView2()
    Try
        Cursor = Cursors.WaitCursor
        '=================================================
        'eto lang naman ung mahalaga-> para ilabas sa datagridview ung laman ng table
        query = "Select * From tblteacherload;" ' malamang eto ung query
        database.ToDataGrid(Me.DataGridView2, query)   ' eto naman ung pang-execute
        '=================================================
        Cursor = Cursors.Default
    Catch ex As Exception
        MessageBox.Show("Connection Failed")
        Cursor = Cursors.Default
    End Try
End Sub

'eto ung mga query, dapat maayos at tama lahat ng nakasulat., pag hindi error lalabas, magingat ka sa pag-dedeclare, tignan mo mabuti ung query para tama
Private Sub add_save()
    query = "INSERT INTO `tblteacherload`(`ID`, `Name`, `Section`, `Subject`, `Day`,`Time`,`Room`) VALUES ('" _
            & TextBox1.Text & "', '" & TextBox2.Text & "', '" & TextBox3.Text & "', '" & TextBox4.Text & "', '" & TextBox5.Text & "', '" & TextBox6.Text & "', , '" & TextBox7.Text & "');"
    database.ToDataGrid(Me.DataGridView2, query)
    clear()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    add_save()
    MsgBox("Saved Successfully", MsgBoxStyle.Information, "")
End Sub
Private Sub clear()
    TextBox1.Clear()
    TextBox2.Clear()
    TextBox3.Clear()
    TextBox4.Clear()
    TextBox5.Clear()
    TextBox6.Clear()
    TextBox7.Clear()

End Sub

Private Sub FillByToolStripButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
    Try
        Me.TblteacherloadTableAdapter1.FillBy(Me.TblteacherloadDataSet2.tblteacherload)
    Catch ex As System.Exception
        System.Windows.Forms.MessageBox.Show(ex.Message)
    End Try

End Sub
End Class

最佳答案

错误在这一行

Me.Name = New System.Windows.Forms.DataGridViewTextBoxColumn()

您的 DataGridView 控件上有一个名为“Name”的列，并且表单有一个名为“Name”的属性。当设计人员找到上面的行时，它认为那是表单的属性名称。

如果您查看设计器代码，您会发现另一行

Me.Name = "frmTeacherload"

要修复该错误，您必须重命名该列。

关于VB.Net 设计器错误(类型 'String' 的值无法转换为 'System.Windows.Forms.DataGridViewTextBoxColumn' 。)，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/22431940/

文章推荐： python - 将颜色条添加到极地 contourf 多图

文章推荐： r - 二分图匹配以匹配两个集合

文章推荐： sql - 在 SQL 查询中将日期舍入到日期

文章推荐： uml - 在我的用例图中定义参与者

java - 如何解析名称=值^^名称=值^^名称=值
我的问题:非常具体。我正在尝试想出解析以下文本的最简单方法: ^^domain=domain_value^^version=version_value^^account_type=account_ty
Python:尝试创建与(或(值，值，值))的等价物
好吧，这就是我的困境: 我正在为 Reddit 子版 block 开发常见问题解答机器人。我在 bool 逻辑方面遇到了麻烦，需要一双更有经验的眼睛(这是我在 Python 中的第一次冒险)。现在，该
excel - 如何使循环同时运行所有 X 和 Y 值，现在它运行所有 Y 值，然后运行所有 X 值
它首先遍历所有 y 值，然后遍历所有 x 值。我需要 X 和 y 同时改变。 For x = 3 To lr + 1 For y = 2 To lr anyl.Cells(x, 1)
excel - SUMIF(条件，值)、SUMPROD(条件，值)和 SUM(条件*值)之间的区别
假设我有一个包含 2 列的 Excel 表格:单元格 A1 到 A10 中的日期和 B1 到 B10 中的值。我想对五月日期的所有值求和。我有3种可能性: {=SUM((MONTH(A1:A10)=
python - 将 Z 值(Z 值，标准分数)转换为 Python 中正态分布的 p 值
如何转换 Z-score来自 Z-distribution (standard normal distribution, Gaussian distribution)到 p-value ?我还没有找到
javascript( bool 值 ^ bool 值)
我正在重写一些 Javascript 代码以在 Excel VBA 中工作。由于在这个网站上搜索，我已经设法翻译了几乎所有的 Javascript 代码!但是，有些代码我无法准确理解它在做什么。这是一
php - 在php中的数组内添加新的键，值(值= 1)
我遇到过包含日期格式的时间戳日期的情况。然后我想构建一个图表，显示“点击”项目的数量“每天”， //array declaration $array1 = array("Date" => 0); $a
scala - Option(值)和Some(值)之间的差异
我是scala的新手! 我的问题是，是否有包含成员的案例类 myItem:Option[String] 当我构造类时，我需要将字符串内容包装在: Option("some string") 要么 So
php - 从表中选择 * 其中列 = 值 ^ column2 = 值
我正在用 PHP 创建一个登录系统。我需要用户使用他或她的用户名或电子邮件或电话号码登录然后使用密码。因为我知道在 Java 中我们会像 email==user^ username == user 这
c++ - WHERE 列 = 值，仅适用于 INTEGER 值
我在 C++ 项目上使用 sqlite，但是当我在具有文本值的列上使用 WHERE 时出现问题我创建了一个 sqlite 数据库: CREATE TABLE User( id INTEGER
c++ - 类类名(值)；和类类名=值；显式构造函数时的区别
当构造函数是显式时，它不用于隐式转换。在给定的代码片段中，构造函数被标记为 explicit。那为什么在 foo obj1(10.25); 情况下它可以工作，而在 foo obj2=10.25; 情况
c# - : if(! 值) 或 if(flag == 值) 哪个更清晰？
我知道这是一个主观问题，所以如果需要关闭它，我深表歉意，但我觉得它经常出现，让我想知道是否普遍偏爱一种形式而不是另一种形式。显然，最好的答案是“重构代码，这样你就不需要测试是否存在错误”，但有时没有
jquery - [属性~=值] 和 [属性*=值] 有什么区别？
这两个 jQuery 选择器有什么区别？以下是来自 w3schools.com 的定义: [attribute~=value] 选择器选择带有特定属性，其值包含特定字符串。 [attribute*=
CSS [属性|=值] 与 [属性*=值] 选择器
为什么我们需要CSS [attribute|=value] Selector根本当 CSS3 [attribute*=value] Selector基本上完成相同的事情，浏览器兼容性几乎相似？是否存在
java - 正则表达式仅验证 0 值。要验证的单个 0 值
我正在解决 regx 问题。我已经有一个像这样的 regx [0-9]*([.][0-9]{2})。这是 amont 格式验证。现在，通过此验证，我想包括不应提供 0 金额。比如 10 是有效的，但
java - 尽管代码删除了 "0"值，但为什么列表中仍保留 "0"值？
我正在研究计算机科学 A 考试的样题，但无法弄清楚为什么以下问题的正确答案是正确的。考虑以下方法。 public static void mystery(List nums) { for (
perl - 基本的 Perl 散列排序键，值，但也键 AND 值
好的，我正在编写一个 Perl 程序，它有一个我收集的值的哈希值(完全在一个完全独立的程序中)并提供给这个 Perl 脚本。这个散列是 (string,string) 的散列。我想通过 3 种方式对
mysql - 根据其他两列选择一列的 MAX 值，其中一列具有 MAX 值
我有一个表数据如下，来自不同的表。仅当第三列具有值“债务”并且第一列(日期)具有最大值时，我才想从第四列中获取最大值。最终值基于 MAX(DATE) 而不是 MAX(PRICE)。所以用简单的语言来说
php - 代码仅更新数据库中的 false 值，但不更新 true 值
我有一个奇怪的情况，只有错误状态保存到数据库中。当“状态”应该为 true 时，我的查询仍然执行 false。我有具有此功能的 Controller public function change_a
mysql SUM(值) 其中 SUM(值) > 2500
我有一个交易表(针对所需列进行了简化): id client_id value 1 1 200 2 2 150 3 1

行者123

个人简介

我是一名优秀的程序员,十分优秀！

作者热门文章

滴滴打车优惠券免费领取

全站热门文章

首页

博学

6Ren·AI

商城

VB.Net 设计器错误(类型 'String' 的值无法转换为 'System.Windows.Forms.DataGridViewTextBoxColumn' 。)