３４.スクリーン全体のデバイスコンテキストのハンドルを取得



＜　使用用途　＞
スクリーン全体のデバイスコンテキストのハンドルを取得 　

＜　説明　＞
ＡＰＩ関数のGetDC を使用します。
GetDC＝＞スクリーン全体のデバイスコンテキストのハンドルを取得
　　＜引数＞
　　　　　hWnd&：ウインドウのハンドル
　　＠戻り値＠　　
　　　ハンドルが戻る
＊hWnd&を0にするとスクリーン全体のデバイスコンテキストのハンドルが取得できる。

<　ＳＡＭＰＬＥ　＞
'標準モジュール
Public Declare Function GetDC Lib "USER32" (ByVal hWnd&) As Long

'ここからはフォームの処理
Private Sub Command1_Click()
　　Dim Ret As Long
　　　　　Ret=GetDC(0)
End Sub