Programm zum wechseln von bildschirmhintergund bildern

[novaforce]

Hallo erstmal
ich habe in problem ich will ein programm schreiben
das automatisch den bildschirlmhintergrund wechselt
ES soll ein verzeichnis eingetragen werden aus dem die bilder automatisch nach ein ander gewechselt werden
ich will die zeit bis zum nächsten wechsel in ein feld eintragen könnenn und ob das bild zentriert ,gestreckt oder nebeneinander dargestellt wird
ich weis nur nicht wie ich das in die regestry eintragen kann und wie ich das programm automatisch mitlaufen lassen kann

Mein code sieht bisher so aus

Private Sub Abbrechen_Click()
End 'abbrechenbutton
End Sub

Private Sub Check1_Click()
'zentriert
End Sub

Private Sub Check2_Click()
'gestreckt
End Sub

Private Sub Check3_Click()
'nebeneinander
End Sub

Private Sub Dir1_Change()
Text2 = Dir1.Path 'ordnerauswahl
End Sub

Public Sub Drive1_Change()
Me.Dir1.Path = Me.Drive1.Drive
'plattenauswahl

End Sub
Public Sub Auswaelen_Click()
Text2.Visible = Not Text2.Visible
Label3.Visible = Not Label3.Visible
'button der die ordnerauswahl sichtbar macht sichtbar macht
Dir1.Visible = Not Dir1.Visible
Drive1.Visible = Not Drive1.Visible
End Sub




Private Sub OK_Click()
'hier soll alles in die regestry deschrieben werden
End Sub

Private Sub Text2_Change()
'pfadanzeige
End Sub

Private Sub Zeit_Click()
'button der das zeitfeld sichtbar macht
zeits.Visible = Not zeits.Visible
zeittext.Visible = Not zeittext.Visible
End Sub

Private Sub zeits_Change()
'zeit bis zum wechsel
End Sub

Vielen dank für die hilfe im voraus

PS: wer ein rechschreibfehler findet darf ihn behalten*g*