Yalnızca vb 6'daki harfleri okumak için kod

yalnızca vb 6'daki harfleri okumak için kod

Select Case keyascii
            Case Asc("A") To Asc("Z") 
            Case Asc("a") To Asc("z")
            Case Else
                MsgBox "Alphabets not allowed!", vbCritical
        End Select