Dim hSettings As Settings
Dim aVariant As Variant

hSettings [ Key As String ] = aVariant

Associates a setting with a key.