Visual Basic - tengo un problema con SQL

tengo un problema al utilicar este codigo;

Private Sub PROG_Click()
temp.RecordSource = "SELECT COUNT(*) AS total, CLASE1, CODIGO1, LABCONF1, CLASE2, " & _
" CODIGO2, DIAGNOST2, LABCONF2, LABCONF5, DIAGNOST5, " & _
" CODIGO5, CLASE5, LABCONF4, DIAGNOST4, CODIGO4, " & _
" CLASE4, LABCONF3, DIAGNOST3, CLASE3, CODIGO3, " & _
" LABCONF6 , DIAGNOST6, CODIGO6, CLASE6 " & _
" Into temp " & _
" From his32005 " & _
" WHERE (COD_ESTAB = '210801101') " & _
" GROUP BY CLASE1, CODIGO1, DIAGNOST1, LABCONF1, CLASE2, " & _
" CODIGO2, DIAGNOST2, LABCONF2, LABCONF5, DIAGNOST5, " & _
" CODIGO5, CLASE5, LABCONF4, DIAGNOST4, CODIGO4, " & _
" CLASE4, LABCONF3, DIAGNOST3, CLASE3, CODIGO3, " & _
" LABCONF6 , DIAGNOST6, CODIGO6, CLASE6 " & _
" ORDER BY COUNT(*) DESC "
temp.Refresh ' aqui es el problema

End Sub

y no lo pod`s poner mas complicado? nos desis lo k querès e intentaremos ayudaros.

Me parece que tu problema es este:
En tu select la columna 3 y 4 no se encuentra en tu group by espeificado en ese orden....
la duda que tengo es que si esto te funcionó en sql puro..????