参数提示无法转换为String类型

Question

我的代码：

con.Open()
cmd = New SqlCommand("select max(LID) from Lieferanten", con)
Dim newIDSupplier As Double = cmd.ExecuteScalar
newIDSupplier += 1
con.Close()

con.Open()
cmd = New SqlCommand("INSERT into LIEFERANTEN(LID, LNAME1) VALUES(@newIDSupplier, @companyName)", con)
cmd.Parameters.AddWithValue("@newIDSupplier", newIDSupplier)

cmd.ExecuteNonQuery()
con.Close()

在cmd.ExecuteNonQuery()始终出现错误消息：

  

参数提示无法转换为String

类型

感谢任何帮助。

Answer 1

您是否尝试过如下，也应该通过公司名称：

cmd.Parameters.AddWithValue("@newIDSupplier", newIDSupplier.ToString())