با سلام خدمت دوستان گرامی
آخراً که برای فارسی نویسی خود سایت نوشته که از کلید Scroll Lock استفاده کنید، نگفته اگر ویندوز اینجوری بود بعد شما ... و ... ، در نهایت که هر جور حال می کنی بنویس ولی قوانین سایت رو زیر پا نذار.
و اما دوستمون از دستور IF استفاده کرده بودند با اون شرط خفن.
تست کنید ببینید که آیا با Select Case راحت تر و خوانا تر نیست؟
Select Case Asc(e.KeyChar)
Case 8 'BackSpace
Case 48 To 57 ' 0 to 9
Case 13 ' Enter
SendKeys.Send("{TAB}")
Case Else
e.Handled = True
End Select
با احترام- خدانگهدار