Ваш пример немного вздор, учитывая, что в операторе INSERT
нет предложения WHERE
. Однако принцип остается:
Dim id As Integer?
Dim sql = "UPDATE Student SET Name = @Name WHERE Id = @Id"
Dim command As New OleDbCommand(sql, connection)
With command.Parameters
.Add("@Name", OleDbType.VarChar, 50).Value = name
.Add("@Id", OleDbType.Integer).Value = If(id.HasValue, id.Value, CObj(DBNull.Value))
End With