ShowUserNamesInResults Property
Returns or sets a Boolean that determines if the names of users who have completed the survey will be visible. Read/write.
expression.ShowUserNamesInResults
*expression * Required. An expression that returns a Survey object.
Example
The following example sets the ShowUserNamesInResults property for each Survey object in the active Web site to True, displaying the names of all users who completed the survey.
Note Use the ApplyChanges method to save any changes made to the list.
Sub ChangePermissions()
'Changes permission of all BasicLists in the current Web site
Dim objApp As FrontPage.Application
Dim objList As Object
Dim objLists As Lists
Set objApp = FrontPage.Application
Set objLists = objApp.ActiveWeb.Lists
'Cycle through each list and check for list type
For Each objList In objLists
'If it's a Survey then change permissions
If objList.Type = fpListTypeSurvey Then
If objList.ShowUserNamesInResults <> True Then
objList.ShowUserNamesInResults = True
objList.ApplyChanges
End If
End If
Next
End Sub
Applies to | Survey Object
See Also | MaximumValue Property | MinimumValue Property | ShowAsPercentage Property