Sets the value of the specified key value.
Syntax: SetStringValue (SubKey As String, ValueName As String, Value As String)
If the ValueName does not exist a new value will be created.
Example:
Sub App_Start
reg.New1
reg.RootKey(reg.rtCurrentUser)
reg.SetStringValue("Software\My Application","Sring Value", "Some
string")
End Sub