Salve, ho un problema quando cerco di fare dei calcoli con dei dati recuperati da un DB MySql

codice:
Dim Totale
Dim Feed_si
Dim Feed_no
Dim Feed_ns

Feed_si = (RsPositivi.Fields.Item("COUNT(*)").Value)
Feed_no = (RsNegativi.Fields.Item("COUNT(*)").Value)
Feed_ns = (RsNeutri.Fields.Item("COUNT(*)").Value)

Totale = (Feed_si+Feed_no+Feed_ns)
Facendo i vari controlli, le varie variabili Feed_si, Feed_no,Feed_ns vengono valorizzate correttamente, ma quando poi cerco di sommarle per ricavare la variabile Totale mi da come errore

Errore di run-time di Microsoft VBScript (0x800A000D)
Tipo non corrispondente

ovviamente alla riga Totale = (Feed_si+Feed_no+Feed_ns)

Qualche suggerimento?

Grazie e buona giornata a tutti