delete campo desde vb.met a sql server

[blo_OD]

resuleto!!!
aca esta la solucion.


saludos!


.................................................. .......
Private Sub Eliminar_cmd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Eliminar_cmd.Click
Dim conexion As SqlClient.SqlConnection
Dim DA_borrarJug As SqlClient.SqlDataAdapter
Dim DS_jugador As New DataSet
Dim sql As String



sql = "use PmBase delete from jugadores where id_jugador = '" & id_txt.Text & "'"
conexion = New SqlClient.SqlConnection
conexion.ConnectionString = "Data Source=.\SQLEXPRESS;Initial Catalog=PmBase;Integrated Security=True"
DA_borrarJug = New SqlClient.SqlDataAdapter("select * from consulta_jugador", conexion)

Try
conexion.Open()
DA_borrarJug.DeleteCommand = conexion.CreateCommand
DA_borrarJug.DeleteCommand.CommandText = sql
DA_borrarJug.DeleteCommand.ExecuteNonQuery()
MsgBox("jugador borrado", MsgBoxStyle.Information)
Catch ex As Exception
MsgBox(ex.ToString)
End Try

End Sub