You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
11 lines
389 B
11 lines
389 B
4 weeks ago
|
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 dwRop As Long) As Long
|
||
|
|
Global Const SRCCOPY = &HCC0020 ' (DWORD) dest = source
|
||
|
|
Global card As Integer
|
||
|
|
Global card_number As Integer
|
||
|
|
|
||
|
|
|
||
|
|
|