thisform.dokeyhandler(ASC(this.label1.Caption))You can also use the taf-property.
thisform.cactivefield = "txtanrede" IF thisform.cactivefield <> thisform.lastcontrol thisform.cValStore = "" EndifcValstore is used to control the input and later to assign the value to the txtbox
thisform.lastcontrol = "txtanrede"Lostfocus saves the textbox which is left.
thisform.cValStore = thisform.cValstore + CHR(nKeycode) cCommand = "thisform." + thisform.cactivefield + ".value = '" + thisform.cValstore + "'" &cCommand cFeld = thisform.cactivefield nlength = LEN(ALLTRIM(thisform.&cFeld..value)) thisform.&cFeld..ssTextBox1.SelStart = nLengthSo this is what I basically do, I hope this helps. Please excuse the typos, my eyesight is bad today.