Brandon
Brandon

Reputation: 127

Referencing resource images dynamically

I'm making a Blackjack game and I'm having a rough time getting a picture of the cards without "hard coding" every single picture to values I'm passing it.

Current Code (not desired, but works):

Public Function Return_Card(CardVal As String, CardSuit As String) As Image
    If CardVal = "Ace" And CardSuit = "Clubs" Then
        Return My.Resources.AceOfClubs
    ElseIf CardVal = "Two" And CardSuit = "Clubs" Then
        Return My.Resources.TwoOfClubs
    ElseIf CardVal = "Three" And CardSuit = "Clubs" Then
        Return My.Resources.ThreeOfClubs
    ' Need the other 49 cards to complete deck
    End If
End Function

Desired Code:

Public Function Return_Card(CardVal As String, CardSuit As String) As Image
    ' Return any picture of a card based on what is being passed in CardVal and CardSuit
    Return My.Resources.CardValOfCardSuit
End Function

bump

Upvotes: 0

Views: 48

Answers (1)

Brandon
Brandon

Reputation: 127

Public Function Return_Card(CardVal As String, CardNum As String) As Image
    Return My.Resources.ResourceManager.GetObject(CardVal + "Of" + CardNum)
End Function

Upvotes: 1

Related Questions