Application("key") = value Dim value As Object = Application("key")