Public Function SpellPlayingCard( _
ByVal vCard As Variant _
) As Variant SpellPlayingCard("7C") = "Seven of Clubs"
SpellPlayingCard("AS") = "Ace of Spades"
SpellPlayingCard("10D") = "Ten of Diamonds"
SpellPlayingCard("JA") = "Joker of Aces"
IsNull(SpellPlayingCard("JD")) = TrueSee also: DealPlayingCardDecks Function
Spellings ClassvCard: String containing a playing card abbreviation such as "7C" or "AS" or "10D" which will be spelled out. Function returns Null if vCard is Null or cannot be fixed up to a String. Summary: Each card is represented by a two- or three-character string that describes the number of the card and its suite. The card abbreviation is composed of one value from each of the following tables:
Card Numbers:
1 Joker
2..10 Numbered cards 2 through 10
J Jack
Q Queen
K King
A AceCard Suites: A Aces
C Clubs
D Diamonds
S SpadesWhen Jokers are used, this function and DealPlayingCardDecks only recognize Jokers as belonging to the Aces and Clubs suites. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.