Visual Basic - Actualizar existencia de un producto

Estoy trabajando con sql y vb.net tengo un combobox con dos datos "ENTRADA" y "SALIDA" y dos textbox que es para la cantidad que desea sumar o restar y otro para el ID del producto al seleccionar "ENTRADA" mi programa en visual debe sumar esa cantidad al ID producto que seleccione en una tabla que tengo en SQL tengo el siguiente codigo que deberia funcionarme pero me da este error : error incorrect syntax near the keyword "where"

Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
Try
opcion = ComboBox1.SelectedIndex
If opcion = 0 Then
Dim comando As SqlCommand
Dim strSQL As String
Dim conexion As New SqlConnection("server=Anthony-D\SQLEXPRESS; initial catalog=inventarios; integrated security=true")
conexion.Open()

strSQL = "update tblProductos set existencia = existencia +" & TextBox2.Text & " where idProducto =" & TextBox1.Text

comando = New SqlCommand(strSQL, conexion)

comando.ExecuteNonQuery()

MsgBox("Registro actualizado")

conexion.Close()
comando.Dispose()

transaccion = "Entrada"
End If
Catch ex As Exception
MsgBox("Error " & ex.Message)
End Try
end sub

Estas validando que el valor de textbox2.text este lleno? por que si esta vacio te va a dar ese error.

Hola

Creo que el error es en la consulta SQL en la parte del WHERE, porque no está completamente escrita.

Asi podrías terminarla: where idProducto =" & TextBox1.Text &""

Por otro lado como dice Andres asegúrate de que tus Textboxs estén llenos

Talvez la instrucción IIF() te ayude ahora o luego para evaluar valores nulos.

Suerte