Visual Basic执行SQL更新报错：text与varchar在等于运算符中不兼容

你遇到的这个报错「The data types text and varchar are incompatible in the equal to operator.」，本质原因是你的Contacts表中FirstName列的数据类型是text，而你在WHERE子句里用的字符串常量属于varchar类型——SQL Server不允许直接用=操作符来比较这两种类型的数据。

下面给你两种可行的解决办法，你可以根据实际情况选择：

方法一：修改表结构（推荐） #

text类型在SQL Server里已经被标记为废弃，后续版本可能会移除，所以最好把FirstName列改成更常用的varchar(n)或nvarchar(n)类型（n是你需要的字符串长度，比如50、100）。执行以下SQL语句就能修改：

ALTER TABLE Contacts ALTER COLUMN FirstName VARCHAR(50) NULL

注：如果原来的列是NOT NULL约束，就把末尾的NULL改成NOT NULL

修改完表结构后，你原来的VB代码就能正常运行了，而且后续也不会再遇到这类类型兼容问题。

方法二：不修改表结构，调整SQL语句 #

如果暂时不能改表结构，那可以通过两种方式绕过类型限制：

方式1：用LIKE代替=操作符 #

SQL Server允许用LIKE来比较text和varchar类型，把你的SQL语句改成这样：

Dim CMD As New SqlCommand("UPDATE Contacts SET FirstName = 'Jack' WHERE FirstName LIKE 'Mark' ", CN)
CN.Open()
Dim rows As Integer = CMD.ExecuteNonQuery()

方式2：将text列转换为varchar后再比较 #

通过CAST或CONVERT函数把text类型转成varchar，再用=比较：

Dim CMD As New SqlCommand("UPDATE Contacts SET FirstName = 'Jack' WHERE CAST(FirstName AS VARCHAR(50)) = 'Mark' ", CN)
CN.Open()
Dim rows As Integer = CMD.ExecuteNonQuery()

额外建议：使用参数化查询更安全 #

顺便提一句，你现在的代码用了字符串拼接SQL的方式，存在SQL注入的风险，建议改成参数化查询，既安全又能避免一些字符串转义的问题，示例代码如下：

' 用Using语句自动管理连接资源，避免内存泄漏
Using CN As New SqlConnection("你的数据库连接字符串")
    Dim updateSql As String = "UPDATE Contacts SET FirstName = @NewName WHERE CAST(FirstName AS VARCHAR(50)) = @OldName"
    Dim CMD As New SqlCommand(updateSql, CN)
    ' 添加参数
    CMD.Parameters.AddWithValue("@NewName", "Jack")
    CMD.Parameters.AddWithValue("@OldName", "Mark")
    
    CN.Open()
    Dim rows As Integer = CMD.ExecuteNonQuery()
    ' 可以添加更新结果的提示，比如：
    ' MessageBox.Show($"成功更新了{rows}条数据")
End Using

内容的提问来源于stack exchange，提问作者Enrique Bello