Vb6.0 Picture ช่วยหน่อยครับ

ช่วยดู โค๊ดให้หน่อยครับ คือผมใช้ picture box  ซึ่งผมได้เตรียมภาพมือไว้แล้ว เช่น ภาพ hand65 คือA ใหญ่  Hand66 คือ B ใหญ่ พอกดก็เปลี่ยนภาพใน picture box  ต้องทำยังไงกับโค๊ดหรอครับ

เหมือนในภาพนี้อะครับ
http://www.mx7.com/i/694/VQ8jBr.gif

Private Sub HighLightKey(ByVal parLetter As String, ByVal par_color As Long)
    Dim b As Integer
    Dim ascval As Integer
    ascval = Asc(parLetter)
    b = checkkey(ascval)
    If b > 0 Then
        cmdLetter(b).BackColor = par_color
    ElseIf ascval = 13 Then
        cmdLetter(50).BackColor = par_color
    ElseIf ascval = 32 Then
        cmdLetter(49).BackColor = par_color
    ElseIf cmdShift = 14 Then
    cmdShift.BackColor = par_color
    ElseIf ascval = 1 Then
    
    End If
End Sub

Function checkkey(k As Integer) As Integer
    Dim b As Integer
    b = 0
    If k = 65 Or k = 97 Or k = 191 Or k = 196 Then b = 1              65 คือ A   97 คือ a  191 คือ ฟ 196 คือ  ฤ