module1.bas

来自「报警信息查询系统VB+ACESS 根据某啤酒厂出现故障不同（如系统错误、负亟接」· BAS 代码 · 共 6 行

Attribute VB_Name = "Module1"
Option Explicit

Declare Function BitBlt Lib "GDI32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal DrawStyle As Long) As Long