GetDC() に渡すべき値はウィンドウの ID(TestLabel など)ではなくウィンドウのハンドル(HWND)です。
ハンドルは GetDlgItem() を用いて次のように取得します。
コード: 全て選択
Dim hWndLabel As HWND
hWndLabel = GetDlgItem(hMainWnd, TestLabel)
HDC を取得したいとのことなので、この hWndLabel を GetDC() に渡してやれば良いでしょう。
しかし、現在僕の手元に検証できる環境がないので確かなことではありませんが、ラベルコントロールはもともと HDC を持ってなかったような気がします。
もしかすると HWND すら持っていなかったかもしれません。
その場合は NULL が返ってくるのかしら?
このコードで無事動けば良いのですが。