Quantcast
Channel: VBForums
Viewing all articles
Browse latest Browse all 15866

How to use Rectangle API function

$
0
0
I declare the Rectangle API function:

Code:

Private Declare Function Rectangle Lib "gdi32" (ByVal hdc As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
I use it in a Sub:

Code:

Private Sub Command1_Click()
 Rectangle Me.hwnd, 0, 0, 50, 50
End Sub

But nothing happens

Viewing all articles
Browse latest Browse all 15866

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>