Access - comparar campos

Hola a todos:
Necesito un poco de ayuda
Alguien podria decirme que tengo mal hecho para que "sqlPedVid y sqlAlbVid) me den como resultado un valor ""

Private Sub Form_Close()
Dim dbsNorthwind As DAO.Database
Dim rstPedidos As DAO.Recordset
Dim sqlPedVid As String
Dim sqlAlbVid As String


sqlPedVid = "SELECT Sum(TBl_DetPedidoVid.nCantidadVid) AS SumaDenCantidadVid " & _
"FROM TBl_DetPedidoVid " & _
"GROUP BY TBl_DetPedidoVid.tNumPedVid, TBl_DetPedidoVid.oAnulado " & _
"HAVING (((TBl_DetPedidoVid.tNumPedVid) = 90029) AND ((TBl_DetPedidoVid.oAnulado)=False))"

sqlAlbVid = "SELECT Sum(TBl_AlbDetVidCom.nCanRecVid) AS SumaDenCanRecVid " & _
"FROM TBl_AlbDetVidCom " & _
"GROUP BY TBl_AlbDetVidCom.VttNumPedVid " & _
"HAVING (((TBl_AlbDetVidCom.VttNumPedVid) = 90029))"

' comprueba si son iguales las sqls
If sqlPedVid = sqlAlbVid Then