C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


■88844 / )  Re[1]: VB.NETでの全ハンドル列挙について
□投稿者/ 魔界の仮面弁士 (1872回)-(2018/10/04(Thu) 14:19:01)
No88842 (ぽん さん) に返信
> 上記URLに、VB.NETでTreeViewに実行中のすべてのコントロールを表示するコードが載せられているのですが
VB6 互換 Collection を使っていたり、IntPtr を使わずに
x86 かつ Option Strict Off 前提のコードになっていたり、
Wide API ではなく ANSI API になっていて、しかも
文字列をバイナリで処理していたりするなど、
突っ込みどころが満載なので、ゴッソリ書き直したい…。


> ハンドルの取得ができずに困っております。
取得はされてますよ。colChilds(j)(0) を表示していないだけ。

VB.NET 版のコードは、
 Dim strClass As String は colChilds(j)(1) から取得
 Dim strTitle As String は colChilds(j)(2) から取得
となっていて、それを
 New TreeNode(strClass & " - " & strTitle)
で表示していますよね。


なので、
 Dim strHandle As String = CInt(colChilds(j)(0)).ToString("X8")
などを追加して、
 New TreeNode(strHandle & " - " & strClass & " - " & strTitle)
にでも変えてやれば良いんじゃないでしょうか。VB6 版のように。
返信 編集キー/


管理者用

- Child Tree -