hDCに関するエラーを治すには？ (ID:86421)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ＞魔界の仮面弁士さん > こちらには試せる環境も無いですし、コードの全容も見えないので、 > 提示された情報だけではアドバイスのしようが無いです。(^^;) 当方の説明不足、申し訳ないです。 ソースの主要部分抜粋ですが、 Module _Module Public Declare Sub drawing Lib "dynamic.dll" (ByVal hDC As IntPtr, ByVal setData!) Public Declare Function GetDC Lib "user32" Alias "GetDC" (ByVal hWnd As IntPtr) As IntPtr Public setData(30) As Single 'VC++側へ渡す設定データ Public Sub Display() Dim frmspace As New frmspace() setData(0) = frmspace.picSpace.Width ・ ・ ・ setData(15) = ・・・ Dim pic_hDC As IntPtr = GetDC(frmspace.picSpace.Handle) Call drawing(pic_hDC, setData(0)) End Sub End Module Display()内でsetData配列に各数値情報を与えてdrawing関数をCallして フォーム(frmSpace)上のピクチャボックス(picSpace)に描画します。 こんな感じでお分かりいただけますでしょうか(^^;)？