Advertisement
2002C Coding Standards #15585

Write text in a label at run-time

With this simple code you can type text into a label at run-time. A rather smart idea I think.

AI

AI 요약: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

소스 코드
original-source
'This writes to a label if the form is in "focus"
Private Sub Form_KeyPress(KeyAscii As Integer)
label = label & Chr$(KeyAscii)
End Sub
' You need to make some changes for backspace to work. The key nr for backspace is 8.
원본 댓글 (3)
Wayback Machine에서 복구됨