FrontPage VBA教程:ShowUserNamesInResults属性

返回或设置一个 Boolean 类型的值,用来确定完成调查的用户名是否可见。可读写。

expression.ShowUserNamesInResults

expression  必选。返回Survey对象的表达式。

VBA示例

以下示例将当前站点上各个 Survey对象的 ShowUserNamesInResults属性设置为 True,并显示所有完成调查的用户名。

注意 使用 ApplyChanges方法来保存对列表所做的更改。


Sub ChangePermissions()
'Changes permission of all BasicLists in the current web
    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

上页:FrontPage VBA教程:ShowStartupDialog属性 下页:FrontPage VBA教程:SlowPage属性

FrontPage VBA教程:ShowUserNamesInResults属性

FrontPage VBA教程:SlowPage属性 FrontPage VBA教程:styleSheets属性
FrontPage VBA教程:SubTree属性 FrontPage VBA教程:SubViewMode属性
FrontPage VBA教程:System属性 FrontPage VBA教程:Template属性
FrontPage VBA教程:ThemeProperties属性 FrontPage VBA教程:Themes属性
FrontPage VBA教程:Title属性 FrontPage VBA教程:Type属性
FrontPage VBA教程:URL属性 FrontPage VBA教程:UserName属性
FrontPage VBA教程:VBE属性 FrontPage VBA教程:Version属性
FrontPage VBA教程:VerticalResolution属性 FrontPage VBA教程:ViewMode属性
FrontPage VBA教程:ViewModeEx属性 FrontPage VBA教程:Visible属性
FrontPage VBA教程:vlinkColor属性 FrontPage VBA教程:Web属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号