hab mir mal n paar gedanken gemacht und mal
20 Minuten in VB rumgeklickt, soweit bin ich
damit gekommen:

Bild hier  

mal schaun, vielleicht mach ich morgen nochmal