Attribute VB_Name = "Module1"
Global card As Integer
Global card_number As Integer