Item

array(1) { [0]=> string(14) "FolderItemVerb" } array(1) { [0]=> string(39) "FolderItemVerbs.Item( iIndex )" } string(14) "FolderItemVerb" string(81) "
  1. FolderItemVerb=FolderItemVerbs.Item( iIndex )
"

コレクション内の指定した項目のFolderitemverbオブジェクトを取得します。

構文
  1. FolderItemVerb = FolderItemVerbs.Item( iIndex )
引数
iIndex 必須
0以上Items.Count未満の値を指定
戻り値
FolderItemVerb

FolderItemVerbs オブジェクトを返すメソッド・プロパティ

FolderItem.Verbs メソッド (Shell)

プログラム実行例

デフォルトプリンターを取得

CONST ssfPRINTERS = 4

DIM Shell = CREATEOLEOBJ("Shell.Application")
DIM Folder = Shell.NameSpace(ssfPRINTERS)
DIM FolderItems = Folder.Items

HASHTBL iColumn

FOR n = 0 TO 350
	iColumn[Folder.GetDetailsOf(EMPTYPARAM, n)] = n
NEXT

FOR n = 0 TO FolderItems.Count - 1
	DIM FolderItem = FolderItems.Item(n)
	DIM PrinterName = Folder.GetDetailsOf(FolderItem, iColumn["名前"])
	FOR i = 0 TO FolderItem.Verbs.Count - 1
		IF POS("通常使うプリンターに設定", FolderItem.Verbs.Item(i).Name) <> 0 THEN CONTINUE 2
	NEXT
	PRINT PrinterName
	BREAK
NEXT
  1. CREATEOLEOBJ
  2. NameSpace メソッド
  3. Folder.Items メソッド
  4. Folder.GetDetailsOf メソッド
  5. FolderItemsオブジェクト
  6. FolderItems.Item メソッド
  7. POS
  8. FolderItem.Verbs メソッド
  9. FolderItemVerbs.Item メソッド
  10. FolderItemVerb.Name プロパティ
結果
Brother DCP-J963N Printer