SetMultiStringValue
Previous  Next

Sets the value of the specified key value.
Syntax: SetMultiStringValue (SubKey As String, ValueName As String, Value As String() )
If the ValueName does not exist a new value will be created.

Example:
'Add a Registry object named reg.
Sub Globals
      dim strings(3) As String
End Sub

Sub App_Start
      reg.New1
      reg.RootKey(reg.rtCurrentUser)
      strings(0) = "Some string 1"
      strings(1) = "Some string 2"
      strings(2) = "Some string 3"
      reg.SetMultiStringValue("Software\My Application","Multi String Value", strings())
End Sub