LISTBOXに列挙された項目テキストを他のコントロールにドラッグしようとしています。
方法は、LISTBOX_Clickで選択された項目テキストをドラッグ専用TEXTBOXに転記し、それを
他のコントロールまでドラッグして、そこのDragDropで受け取ります。これはうまく行きました。

ドラッグ専用TEXTBOXのサイズを対象LISTBOX（複数、色々なサイズあり）の項目セルの
大きさに動的に変えたいのですが、そのサイズを知る方法が分かりません。
SendMessageを対象LISTBOXに送れば教えてもらえるだろうと思い調べてみましたが、そういう
LBメッセージが見つかりません。「LISTBOXのHeightを項目数で割れば」と言ってもスクロール
を考えると求められません。

良い解法のヒントをお教えください。

ここの　その他のコントロール関係　の　リストボックスで良く使用する設定集　の中の
現在の行の高さを求める　行の高さを設定する　ではだめだったのでしょうか？

花ちゃんさん、いつも有難うございます。

灯台下暗しで申し訳ないです。LB_の探し方が足りなかったです。。。

Dim H As Long
H = SendMessage(LISTBOX.hWnd, LB_GETITEMHEIGHT, 0, 0) * Screen.TwipsPerPixelY