Grrrr... I can't get this code to work:

Private Sub Command1_Click()
textvalue = GetSetting(HKEY_CURRENT_USER, "Control Panel\desktop", "ScreenSave_Data", "")
Text1.Text = textvalue
End Sub

I get a stupid error, all I want is the text value of the key! Help please...