Hello, I am trying to make a Rock Paper Scissors Game. I hae a combo box which the player is supposed to choose one of the three options. I want when they choose one that a corresponding image is shown in the picture box. I cannot figure out how to make it work. This is my attempt at the code so far can anyone help please?

Private Sub comPlayer_Change()
If comPlayer.Text = "Rock" Then
picPlayer.Picture = LoadPicture("C:\Documents and Settings\Compaq_Owner\Desktop\VB Photos\rock.jpg")
End If
End Sub

you need to use listindex of the combobox to change the picture not the text.