VB语言sql语句报错数据不匹配

想要通过Visual Studio中的VB语言sql语句来实现数据库数据的修改，代码如下：

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        constr = "Provider=Microsoft.ACE.OLEDB.12.0;
            Data Source=D:\窗口文件\温度传感数据\温度传感数据库.accdb;Persist Security Info=False;"
        Dim objconn As New OleDbConnection(constr) '创建连接对象
        Dim selectedRows As DataGridViewSelectedRowCollection = DataGridView1.SelectedRows
        Dim judge
        For Each row As DataGridViewRow In selectedRows
            ' 获取选中行的数据
            Dim rowData1 As String = row.Cells("ID").Value.ToString()
            ' 处理选中行的数据
        Next

        updatesql = "UPDATE 温度传感数据表 SET 温度='" & TextBox1.Text & "',日期='" & TextBox2.Text & "',时间='" & TextBox3.Text & "' WHERE ID=' " & DataGridView1.CurrentRow.Cells(0).Value & " ' "
        Dim cmd As New OleDbCommand(updatesql, objconn) '定义OLEDB语句（sql语句，数据库连接）
        objconn.Open() '打开连接
        judge = cmd.ExecuteNonQuery() '执行sql语句
        Try
            judge = cmd.ExecuteNonQuery() '执行sql语句
        Catch ex As Exception
            MsgBox("修改失败!")
        End Try
        If judge <> 0 Then
            MsgBox("修改成功!")
        End If

    End Sub

但是在updatesql的查询语句遇见了问题，不是很明白要怎么用where限制选择的范围来修改特定的数据。报的错是数据不匹配，如下图

【以下回答由 GPT 生成】

在你的代码中，问题可能是在查询语句的WHERE子句中，将ID字段用作字符串而不是数字。如果ID字段是数值类型的，您可以尝试将其视为整数，如下所示：

updatesql = "UPDATE 温度传感数据表 SET 温度='" & TextBox1.Text & "',日期='" & TextBox2.Text & "',时间='" & TextBox3.Text & "' WHERE ID=" & Convert.ToInt32(DataGridView1.CurrentRow.Cells(0).Value) & ""

此外，请确保数据库表中的字段名称与您在查询语句中使用的名称相匹配，以避免出现数据不匹配的问题。

如果您仍然遇到问题，请提供更多关于错误的详细信息，以帮助我们为您提供更准确的解决方案。

温度是字符串类型？如果是数字，不要引号
另外，多个字段，应该用 update 表(字段列表) values(值列表)
的形式

用的是access数据库

按照惯例分析，表中温度字段应该是数值型，输入界面传入的是string类型。建议试试在updaye语句里使用 温度=val('......')，不字符强制转为数值试试。

数据库字段类型要和右侧的值匹配，比如你的字段是数值类型，你如果传递字符串的话肯定会报错的

在更新 SQL 语句中，您没有对文本框中的值进行检查以确保不为空。如果 TextBox1.Text、TextBox2.Text 或 TextBox3.Text 为空，可能会导致 SQL 查询出现问题。
您的更新 SQL 查询中有额外的空格，例如 " ' "，这可能会导致 ID 值在查询中出现问题。确保您的查询语句构造正确，不会在 ID 值周围添加多余的空格。在一些地方可能需要用到转义字符。