我建了一个表单:
"客户"是用组合框combo1,"地址"是用文本框text1.
组合框的rowsource是"客户表.客户",rowsourcetype是"6-字段",controlsource也是"客户表.客户"
combo1的valid事件中也有代码:
lItemExists = .F. && assume the value isn't in the list.
FOR i = 1 to THIS.ListCount
   IF THIS.List(i) = THIS.Text
      lItemExists = .T.
      EXIT
   ENDIF
ENDFOR
IF !lItemExists
   THIS.AddItem(THIS.Text)
   append blank
   replace 客户 with this.text
ENDIF
现在的问题是在组合框中输入后改变的是另一条记录,不是原先显示的那条记录.

rowsource与controlsource设置为不同！！！如：rowsource设置为查询语句。而不要直接使用表字段
append blank
replace 客户 with this.text
这两行根本用不着！！！


[ 本帖最后由 cnfarer 于 2010-6-30 18:05 编辑 ]

如果rowsource设置为查询语句的话，
那我的"select 客户 from 客户表"这段话要放在什么地方哟

将rowsourcetype改掉啊！！！难道你只会设置为“字段”？

我按楼上教的做了,改成以下:
"客户"是用组合框combo1,"地址"是用文本框text1.
组合框的rowsource是"select 客户 from 客户表 order by 客户",rowsourcetype是"3-SQL语句",controlsource还是是"客户表.客户"
combo1的valid事件中代码:
lItemExists = .F. && assume the value isn't in the list.
FOR i = 1 to THIS.ListCount
   IF THIS.List(i) = THIS.Text
      lItemExists = .T.
      EXIT
   ENDIF
ENDFOR
IF !lItemExists
   THIS.AddItem(THIS.Text)
ENDIF
现在的问题是:我一修改客户的值,就变成空的了

你输入的应该是displayvalue

combo1控件的displayvalue我没有动,还是(无)

我在combo1的valid中就只放了上页那一段代码.
我一改变客户的内容就变成了空的了.是不是还要其他代码配套使用

你把  combo1：rowsource改为 2

你看这个对你有帮助吗

临时表要放值在 COMBO 里面  ，要先在 ini 里面 或者在 LOAD里面声明

itemexists=.f.
for i=1 to this.listcount
    if alltrim(this.list(i))==alltrim(this.text)
        itemexists=.t.
        exit
    endif
endfor
if !itemexists.and.!empty(this.text)
    appe blan
    repl  客户 with alltrim(this.text)
    this.additem(this.text)
    this.list(i)=this.text
endif