Además la api está para facilitar el trabajo. Pero podrias conectar con winsock y hacer la petición http. Pero entonces necesitarias el control winsock, podrías bajarte una libreria que lo imita en www.vbip.com o usar la api del winsock.
Creo que es complicarte la vida y más viniendo con windows como dice LeandroA

Ahí va el mio, jeje. Suelo tener el fondo en gris pero ya que estaba le he metido uno que tenía por ahí.
Poca cosa, ventanas en modo clásico, winamp con transparencia y grácias x)

En realidad yo diría que os queda mucho, se trata de un mensaje que se manda al servicio y este debe responder. Y si que hay bastante documentación al respecto.
A parte de toda la documentación de la msdn tal y como decía slasher que habeis pasado de él y ni la habeis mirado, teneis para .net:

http://www.elguille.info/NET/dotnet/serviciosWindows.htm
Un ejemplo completito para vb6:
http://www.freevbcode.com/ShowCode.Asp?ID=4317

Meted en buscar de freevbcode services nt i vereis si hay ejemplos o no...
Me suena uno que salían las claves de las que hablabais

En general para todo lo que són servicios está el ntsvc.ocx
En definitiva que no es qüestión de cambiar 4 claves y listo.

No le veo ningún sentido a lo que estas haciendo ya que probablemente te hubiera resultado más sencillo todo con un array de checkboxs pero vamos que IronHouse té ha dado la respuesta a lo que te faltaba del modo en que lo quieres hacer.

Un Saludo.

mmm, no está muy clara la pregunta, la qüestión és que quieres volver a separar ése "1596" no?
Si es asi y en el caso que lo tengas en un string puedes utilizar funciones de tratamiento de cadenas:

subcadena=left$(cadena,numerocaracteres)
subcadena=mid$(cadena,inicio,numerodecaracteres)
subcadena=right$(cadena,numerodecaracteres)

Algunos ejemplos para que pruebes en tu caso:
msgbox left$("1596",1) 'Esto te devuelve 1
msgbox mid$("1596",2,1) 'Esto te devuelve 5
msgbox mid$("1596",3,1) 'Esto te devuelve 9
msgbox right$("1596",1) 'Esto te devuelve 6

En el caso que la variable esté en un entero:
primervalor=int(1596/1000)
segundovalor=int((1596-(primerValor*1000))/100)
tercervalor=int((1596-(primerValor*1000+segundoValor*100))/10)

Fijate que es una sucession, y la dinámica és que cojes el primer valor i le sacas los de detras, en el siguiente le restas al resultado el primero sin los demás....

Si del segundo modo te parece muy confuso siempre puedes hacer un cstr(1596) para pasar el entero a cadena y hacerlo del primer modo.

Mas opciones ya no se me ocurren
Un saludo