VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2006/10/10(Tue) 14:18 |
| 投稿者 | ： 魔界の仮面弁士 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^4: プリンタの各種監視について |
> これは、何が原因なのでしょうか？(クエリ式がおかしい？)
WMI がどうとかという話ではなく……For Each ループの使い方がおかしいようですよ。
> For Each objItem In colItems
> Label1(0).Caption = "Name: " & objItem.Name
> Label1(1).Caption = "Name: " & objItem.Name
> Label1(2).Caption = "Name: " & objItem.Name
> Label1(3).Caption = "Name: " & objItem.Name
> Label1(4).Caption = "Name: " & objItem.Name
> Next
たとえば、下記の For〜Next ループを想像してみてください。
For I = 0 To 3
Label1(I).Caption = CStr(I)
Next
もしこれを、
For I = 0 To 3
Label1(0).Caption = CStr(I)
Label1(1).Caption = CStr(I)
Label1(2).Caption = CStr(I)
Label1(3).Caption = CStr(I)
Next
と書いてしまえば、結果が異なりますよね。For Each 〜 Next でも同じことです。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）