KeyAscii - VB

Узнай цену своей работы

Формулировка задачи:

Если можно подробнее об этой прауедуре. И у кого есть значении KeyAscii?

Решение задачи: «KeyAscii»

textual
Листинг программы 
Private Sub List1_KeyPress(KeyAscii As Integer)
List1.Clear
For i = 0 To 255
List1.AddItem i & " --> " & Chr(i) & " --> " & Asc(Chr(i))
Next i
Me.Cls: Me.Print KeyAscii & " --> " & Chr(KeyAscii)
List1.Selected(KeyAscii) = True
End Sub

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.625 из 5
Похожие ответы