メモ帳の小ウィンドウのハンドルを取得したい。

解決


うた  2006-05-21 07:04:35  No: 131511

VB6です。宜しくお願いします。

メモ帳の小ウィンドウのハンドルを取得したいのですが、型が一致しないとエラー
がでます。

Dim hwindow As Long

hwindow = FindWindow(vbNullString, "無題 - メモ帳")

If hwindow <> 0 Then
  hwindow = FindWindowEx(hwindow, vbNullString, "edit", vbNullString)
End If

メモ帳のハンドルは取得できるのですが、FindWindowExの行で型が一致しないと
エラーが出ます。どうしてでしょうか。
ハンドルとかは最近知ったので、よく分かりませんがご教授お願いします。


花ちゃん  URL  2006-05-21 09:08:40  No: 131512

第二引数が文字列になっているからでは。

hwindow = FindWindowEx(hwindow, 0&, "edit", vbNullString)


うた  2006-05-21 18:50:15  No: 131513

花ちゃん本当に有難う御座います。0&と置き換えると上手くいきました。
今、引数の意味をわからず使っていますが、これから勉強だと思います。


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加