Prikazi cijelu temu 18.03.2011 20:24
roko Van mreze
Clan
Registrovan od:02.02.2009
Lokacija:Rijeka


Predmet:Re: Handle buttonClick kao Tastatura KeyCode
Radi se o Touchscreen za prijavu. Touchscreen puni combobox pa ok sa SendKeys je string pa nije problem slati cjelo
ime al sam mislio da ima neko elegantnije riješenje jer ako ima mekoz sa nekim slovom kombo skače jer je našao ime bez obzira na krajnji upis muči me gdje sam pogrešio u backspace
Private Sub BACSP_Click()
Dim varDjelat As Variant
varDjelat = ComboDjelat
If Not IsNull(varDjelat) Or Not varDjelat = "" Then
ComboDjelat = Left(varDjelat, Len(varDjelat) - 1)
End If
DoCmd.RepaintObject

End Sub