Imports System.Collections.Generic

Public Module Module1

    Public Sub Main()

        Dim deck As Stack(Of String) = New Stack(Of String)

​

        deck.Push("Ace of Spade")

        deck.Push("King of Spade")

        deck.Push("Queen of Spade")

    End Sub

End Module