本ページには広告が含まれています。
Windowsシステムで開いているウィンドウの数を表す整数値を取得します。ShellWindowsコレクションに含まれるオブジェクトの数を表します。
- 構文
- iCount = ShellWindows.Count
- 引数
- 戻り値
- ShellWindowsコレクションに含まれるオブジェクトの数
ShellWindows オブジェクトを返すメソッド・プロパティ
- Shell.Count
- ShellWindows オブジェクトを作成して返します。
使い方
Windowsエクスプローラのウィンドウの数を取得します。
DIM Shell = CREATEOLEOBJ("Shell.Application")
DIM ShellWindows = Shell.Windows
PRINT ShellWindows.Count
プログラム実行例
起動しているInternet Explorerの数を出力
DIM Shell = CREATEOLEOBJ("Shell.Application")
DIM cnt = 0
FOR n = 0 TO Shell.Windows.Count - 1
IF Shell.Windows.Item(n).Name = "Internet Explorer" THEN cnt = cnt + 1
NEXT
PRINT cnt
使用関数