by Rolando A. Arcilla (1 Submission)
Category: Databases/Data Access/DAO/ADO
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Tue 11th September 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
This code will teach how to initialize the textbox and how to pass the focus from the microsoft flexgrid control to the textbox.
Edt As Control, KeyAscii As Integer)
' Use the character that was typed.
Select Case keyascii
' A space means edit the current text.
Case 0 To 32
Edt = MSFlexGrid
Edt.SelStart = 1000
' Anything else means replace the current text.
Case Else
Edt = Chr(keyascii)
Edt.SelStart = 1
End Select
' Show Edt at the right place.
Edt.Move MSFlexGrid.CellLeft, MSFlexGrid.CellTop, _
MSFlexGrid.CellWidth, MSFlexGrid.CellHeight
Edt.Visible = True
' And let it work.
Edt.SetFocus
End Sub
No comments have been posted about This code will teach how to initialize the textbox and how to pass the focus from the microsoft fle. Why not be the first to post a comment about This code will teach how to initialize the textbox and how to pass the focus from the microsoft fle.