Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer) Dim sTemp As String With MSFlexGrid1 sTemp = .TextMatrix(.Row, .Col) Select Case KeyAscii Case 8 ' backspace If Len(sTemp) > 0 Then sTemp = Left$(sTemp, Len(sTemp) - 1) End If Case 27 ' escape sTemp = "" Case 0 To 31 KeyAscii = 0 Case Else sTemp = sTemp & Chr$(KeyAscii) End Select .TextMatrix(.Row, .Col) = sTemp End With End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.