on screen keybaord

[steve a]

Hi i have a touch screen keyboard within a form, which i would like to use to
input text into a combo form which is liked to fields in a table.
I am currently using

Private Sub cmdKeyW_Click()
lngCurPos = mlngSelStart
With Me.combo
.SetFocus
If CapLockOn = True Then
Me.combo = Me.combo & "W"
Else
Me.combo = Me.combo & "w"
End If
.SelStart = lngCurPos + 1
End With
lngLength = Len(Me.combo)
SetCurMoveOptions lngCurPos, lngLength
End Sub

But this doesn't bring down a drop down to pick from as when you use a
normal keyboard, what am i doing wrong?
Thanks
Steve

 

[Douglas J. Steele]

After your

..SetFocus

line, put

..DropDown

 

[steve a]

Thanks douglas,
I'm now encountering a different problem.
The drop down list only apperar for a very brief second.
any ideas?
many thanks
s

 

[steve a]

Thanks douglas.
I've got the drop down working ok now, but on looking at it, what i really
could do with is a filter as well, to filter the records as you type ( it is
for name entry with over 400 names)

 

[Arvin Meyer [MVP]]

Perhaps you can adapt some of the code in this sample database:

http://www.datastrat.com/Download/ExpandingSearch2K.zip