Ajuda a construír query

Olá

Tengo las seguintes querys que individualmente funcionam:

da-me o peso total das vagonas com o CodMat=1, CodMat=2.

Pretendo com uma só query, somar o resultado da
query1+query2+query3...+query30, e apresentar numa tabela.

Dim Peso(30) as Integer

Peso(1) = 10
Peso(2) = 101
Peso(3) = 123
Peso(4) = 50

Peso(30) = 56

strQuery1 = "SELECT Hour(Hora) as Hora, (Sum(Vagonas) * " & Peso(1) & ")

Vagonas From RegVag where CodMat = 1 AND Year(Data)= " + DataAno + " AND
Month(Data)= " + DataMes + " AND Day(Data)= " + Dia + " Group by
Year(Data), Month(Data), Day(Data), Hour(Hora)"

strQuery2 = "SELECT Hour(Hora) as Hora, (Sum(Vagonas) * " & Peso(2) & ")

Vagonas From RegVag where CodMat = 2 AND Year(Data)= " + DataAno + " AND
Month(Data)= " + DataMes + " AND Day(Data)= " + Dia + " Group by
Year(Data), Month(Data), Day(Data), Hour(Hora)"

strQuery3 = "SELECT Hour(Hora) as Hora, (Sum(Vagonas) * " & Peso(3) & ")

Vagonas From RegVag where CodMat = 3 AND Year(Data)= " + DataAno + " AND
Month(Data)= " + DataMes + " AND Day(Data)= " + Dia + " Group by
Year(Data), Month(Data), Day(Data), Hour(Hora)"
..

strQuery30 = "SELECT Hour(Hora) as Hora, (Sum(Vagonas) * " & Peso(30) & ")
as Vagonas From RegVag where CodMat = 30 AND Year(Data)= " + DataAno + "
AND Month(Data)= " + DataMes + " AND Day(Data)= " + Dia + " Group by
Year(Data), Month(Data), Day(Data), Hour(Hora)"

A diferença entre elas está em: Peso(????) e CodMat=??

Como fazer para obter na tabela la SOMA da query1 + query2 +
query3++query 30?


Cumprimentos

T.C.