Kode untuk membaca surat hanya di VB 6
Select Case keyascii
Case Asc("A") To Asc("Z")
Case Asc("a") To Asc("z")
Case Else
MsgBox "Alphabets not allowed!", vbCritical
End Select
Defeated Dotterel