问题是这样的，我在一个表单里，建了text1,list1
目的是，在text1里输入拼音在list1选取需要的内容。操作是这样的：我在text1按向下，到list1第一行，list1获得焦点，然后再按向下，list1选取下一个值。
代码如下：
text1.keypress:
thisform.list1.Refresh
IF nkeycode=24
thisform.list1.SetFocus
thisform.list1.selected(1)=.t.
thisform.list1.SetFocus
ENDIF

============================================

list1.keypress:
nid=this.listitemid
IF nkeycode=24
this.SetFocus 
this.Selected(nid)=.f.
this.Selected(nid+1)=.t.
ENDIF

结果，能在list1选取第一行，再按向下，就跑到下个控件那儿去了。

请教一下，哪儿出了问题了，谢谢。。。。