大伙好！请教一个关于combobox的思路，谢谢！

[nevexing]

大伙好！请教一个关于combobox的思路，谢谢！
我现在做表单，里面有一个combobox，其init语句如下：
thisform.o_combobox1.ControlSource ='table1.a1' && 把combobox与table1的a1字段绑定，a1字段的数据类型为字符型，长度为3；
thisform.o_combobox1.RowSourceType = 1
thisform.o_combobox1.RowSource='110国有 120集体 130股份合作 141国有联营'
问题：
如何把选择的combobox内容的前三个字符存储到table1.a1中去呢？
例如：
当combobox选择"110国有"时，table1.a1存储"110"；
同时，对table1中已有的记录，当a1='110'时，表单中的combobox 显示的内容为"110国有"？

[nevexing]

不知道我把问题描述清楚了没有。 a1字段的数据类型、长度都不能改动。 看了好几遍张洪举老师的权威指南 中关于combobox\listbox的内容，一直没找到答案 恳请大家提供一个思路。谢谢@！

[nevexing]

我的回复呢

[WWWWA]

上传你的表单、DBF到www.access911.net/csdn ，用WINRAR压缩

[十豆三]

不把combobox与table1的a1字段绑定 例子：

*-- combobox 的 Init 事件代码：
Create Cursor Table1 (a1 c(3))
This.RowSourceType = 1
This.RowSource='110国有,120集体,130股份合作,141国有联营'

*-- combobox 的 InteractiveChange 事件代码：
Select * Into Cursor t1 From Table1 Where Alltrim(a1)=Left(This.DisplayValue,3)
If _Tally=0
	Insert Into Table1 (a1) Values (Left(This.DisplayValue,3))
Endif

[WWWWA]

在combobox LOSTFOCUS事件中 REPLACE a1 WITH LEFT(this.Value,3)

[WWWWA]

在combobox 的INIT事件中 IF a1='110' this.Value='110国有' ENDIF 自行加入其它判断，建议设置combobox为2列 110 国有 120 集体 绑定第1列

[nevexing]

引用 3 楼 WWWWA 的回复:

上传你的表单、DBF到www.access911.net/csdn ，用WINRAR压缩

您好！我已上传。麻烦您提点建议。 文件地址是： http://access911.net/csdn/FileDescription.asp?mdb=2012-11-28&id=37

[nevexing]

引用 6 楼 WWWWA 的回复:

在combobox 的INIT事件中 IF a1='110' this.Value='110国有' ENDIF 自行加入其它判断，建议设置combobox为2列 110 国有 120 集体 绑定第1列

用您的方法，我把combobox的选项来源表再增加一列，其值设为 原选项的前三个字符，combobox设置为2列，其列宽设为0，隐藏。把第二列与table1.a11绑定。非常感谢！

[wwwwb]

简单示例： http://access911.net/csdn/FileDescription.asp?mdb=2012-11-28&id=38&mode=3

[wwwwb]

引用 8 楼 nevexing 的回复:

引用 6 楼 WWWWA 的回复:在combobox 的INIT事件中 IF a1='110' this.Value='110国有' ENDIF 自行加入其它判断，建议设置combobox为2列 110 国有 120 集体 绑定第1列 用您的方法，我把combobox的选项来源表再增加一列，其值设为 原选项的前三个字符，combobox设置为2……

对，这个方法最简单

[nevexing]

引用 4 楼 apple_8180 的回复:

不把combobox与table1的a1字段绑定 例子： Plain Text code?12345678910*-- combobox 的 Init 事件代码：Create Cursor Table1 (a1 c(3))This.RowSourceType = 1This.RowSource='110国有,120集体,130股份合作,141国有联营' *-- com……

谢谢豆老师的热情指导！