[Quote=引用 12 楼 sdhfeng 的回复:]
我将代码改成如此就可以了:
thisform.combo2.RowSource='sele distinc allt(str(bkz)) AS bkz from &_dbc.!bkbm_v into cursor bkzmp order by bkz'
[/Quote]
thisform.combo2.RowSource='sele distinc padr(trans(bkz),10) AS bkz from &_dbc.!bkbm_v into cursor bkzmp order by bkz'
thisform.combo2.DisplayValue=bkzmp.bkz
我在下拉列表框中用的是这样的代码:
thisform.combo2.RowSource='sele distinc bkz from &_dbc.!bkbm_v into cursor bkzmp order by bkz'
thisform.combo2.DisplayValue=ALLTRIM(STR(bkzmp.bkz))
加上上面这位老兄的代码,下拉菜单宽度是变了,可是当点击下拉菜单时,数字看不到了,因为原先数字是紧靠在最右边的,现在宽度变窄了,数字不见了。