Simplemente quita la última parte. Debe quedar así:
Código:
Set ITem = ListView1.ListItems.Add(, "", CStr(rs.Fields("id"))
Pues los parámetros del método Add son [Index], [Key], [Text], [Icon], [SmallIcon]. Así que en este caso estarás agregando un elemento a la lista con el texto que esté en el campo id de la tabla.