vb控件.bas

来自「完整的超市管理系统」· BAS 代码 · 共 7 行

Attribute VB_Name = "Module1"
Option Explicit
Public Declare Function CreatePolygonRgn Lib "gdi32" (lpPoint As POINTAPI, ByVal nCount As Long, ByVal nPolyFillMode As Long) As Long
Public Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long