Attribute VB_Name = "Module1"
Option Explicit

Global card As Integer
Global card_number As Integer
Global card_type As Integer