ผมกำลังทำโปรแกรมพิมพ์สัมผัสอยู่ครับ คือผมจะกำหนดให้ shape1 เป็นนิ้วก้อยซ้ายมือ
แบบในภาพนี้เลยครับ มันต้องใช้โค๊ดไรมั่งหรอครับ
http://www.mx7.com/view2/yONYr5XXwZx1XeEr

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
    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 คือ  ฤ


นี้โปรแกรมผม
http://www.mediafire.com/download/6zf205v56h8zt8j/%E0%B9%82%E0%B8%9B%E0%B8%A3%E0%B9%81%E0%B8%81%E0%B8%A3%E0%B8%A1%E0%B8%9E%E0%B8%B4%E0%B8%A1%E0%B8%9E%E0%B9%8C%E0%B8%AA%E0%B8%B1%E0%B8%A1%E0%B8%9C%E0%B8%B1%E0%B8%AA%282%29.rar