Coding deck of cards for "War Card Game" problem

I'm basically making the classic "War Card Game", and I need help with certain pieces of the code along the way. So far i'm still coding the Deck of cards, this is taking me a while because i'm using newly learned things. Here's what I have so far as of now.

Public Class frmWar
Private cv As Integer 'Card Value
Private sv As Integer 'Suit Value
Private Sub frmWar_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim Suits() As String = {"H", "D", "C", "S"}
Dim Faces() As String = {"A", "2", "3", "4", "5", "6", "7", "8", "9", "T", "J", "Q", "K"}

End Sub
End Class

The goal here is there will be a deck of 52 cards randomly shuffled and evenly distributed between two players. Player one will click a button to draw card then followed by player 2 doing the same and whoevers card is a greater value wins the point. I'm sure most of you guys could bang this out in an hour but im a noob at this still /> So I basically don't know where to go from here exactly...

Also this is my first time joining this forum /> I'm trying my best to follow the rules properly but if I slip up please let me know! I really am liking this little community