Error al eliminar registro en dos tablas

Esta es la instrucción que tengo para eliminar un registro en dos tablas relacionadas y me saca error que " Especifique la tabla que contiene los registros que desea eliminar" esto es para VB6

Donde esta el error?

ConsAsi = "DELETE Grupo.Codigo_Programa, Grupo.Codigo_Seccional, Grupo.Codigo_Asignatura, Asignaturas.Código_Asignatura, Asignaturas.Nombre_Asignatura, Asignaturas.Cod_Programa " & _
"FROM Asignaturas INNER JOIN Grupo ON Asignaturas.Código_Asignatura = Grupo.Codigo_Asignatura " & _
"WHERE (((Asignaturas.Código_Asignatura)= Val(TxtCodAsignatura.Text)))"

Gracias de antemano.