Mostrar error al tratar de borrar un registro en otra tabla!

[davidalonsso05]

ALTER procedure [dbo].[sp_borra_t_competencia]
(@id int)
As
Begin

Set NoCount On;

Delete
From T_Competencia
Where
ID = @id
And
ID Not In
(
Select Distinct id_competencia from gruporelacion
)
;

If (@@RowCount = 0) return 1;
print 'error'
return 0;
End

Asi esta.. igual no se cual forma sea mas facil si por esta que me fui o por la que tenia que era:
id = t4.Text
res = MessageBox.Show("Desea borrar la tienda?", "T_Competencia", MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation)

If res = vbYes Then
If Not String.IsNullOrEmpty(t4.Text) Then
sql = "exec sp_borra_t_competencia'" + id + "'"
conectar()
com = New SqlClient.SqlCommand(sql, conexion)
res = com.ExecuteNonQuery
conexion.Close()
MessageBox.Show("Registro Borrado")


End If
End If
llenar_grid2()

Gracias Aquaventus!