Dim eliminar As String = "DELETE FROM Alumno WHERE id_alumno=" & Textcodigo.Text
Dim miconexion As New SqlConnection(cadena)
Dim delete As New SqlCommand(eliminar, miconexion)
miconexion.Open()
delete.ExecuteNonQuery()
miconexion.Close()
MsgBox("El ALUMNO HA SIDO ELIMINADO CON EXITO", MsgBoxStyle.Information)

Gracias por la respuesta esta buenisima bye bye

Mucho cuidado con esa sentencia SQL, es fácil inyectar código maligno y borrar toda la tabla de alumnos.

Para evitar eso ejecuta la sentencia como un procedimeinto almacenado con parámetros.


Algo así:
new SqlCommand("DELETE Alumnos WHERE id=@IdAlumno",conexion)
SqlCommand.CommandType = StoredProcedure.

SqlComand.Parameters.AddWithValue("@IdAlumno",Textcodigo.Text)
etc...