dim strString

Med denna kod sparar du det du vill ha i registret:
Call savestring(Ange nykel här, "Ange undernyckel här", "Ange valfrit namn här", "Ange värdet här")

Med denna kod hämtar du en sträng:
strString = getstring(Ange nykel här, "Ange undernyckel här", "Ange valfrit namn här")

Med denna tar du vort en nyckel OBS, hela mappen försviner:

Call DeleteValue(Ange nykel här, "Ange undernyckel här", "Ange valfrit namn här")
End Sub