Const nPI = 3.14159265238 / 180 '圓周率常數定義
Private Type POINTAPI '自訂義宣告
x As Long
y As Long
End Type
Private Declare Sub PlgBlt Lib "gdi32" (ByVal hdc&, l As POINTAPI, ByVal hdcS&, ByVal x&, ByVal y&, ByVal w&, ByVal h&, ByVal hm&, ByVal xm&, ByVal ym&) '宣告API
Dim a&, b% ... |