UserGroup プロパティ

このオブジェクトが実行されているユーザーグループについての情報を取得する。

prnUserGroup (読込みのみ)

注意点

なし

使用例


Set oPrinter = CreateObject("easyPDF.Printer.7")



MyUserGroup = oPrinter.UserGroup



If MyUserGroup = PRN_GROUP_ADMINISTRATORS Then

    MsgBox "User group: Administrators"

ElseIf MyUserGroup = PRN_GROUP_POWER_USERS Then

    MsgBox "User group: Power users"

ElseIf MyUserGroup = PRN_GROUP_USERS Then

    MsgBox "User group: Users"

ElseIf MyUserGroup = PRN_GROUP_GUESTS Then

    MsgBox "User group: Guests"

Else

    MsgBox "User group: Unknown"

End If