求助：关于Combobox

Question

如何实现如下功能：
允许用户通过Combobox的下拉菜单进行选择，又不能对选择后Combobox的Text进行更改，最好是选择后Combobox的背景色不变成蓝色。可以实现吗？

Answer 1

style=2 可以是可以，但是不可以修改的啊~？属性是只读的

Answer 2

可以在change中加入以下事件:
combobox.locked=true

Answer 3

我试过了，如果改成style2的话，用数据库load data的时候会发生out stack space 
请问怎样解决啊？

Answer 4

to  kevinwang14(天之痕) 在设计的时候就将style设置为2
------------------------------------------------------------
    Dim CN   As New ADODB.Connection                '定义数据库的连接存放数据和代码
    Dim Rs   As New ADODB.Recordset
    CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;"
    CN.Open
    Rs.CursorLocation = adUseClient
    Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic
     
    Do Until Rs.EOF
        Combo1.AddItem Rs.Fields("FirstName")
        Rs.MoveNext
    Loop
   CN.Close
----------------------------------------------------------
运行结果：用户只能选择，不能修改

Answer 5

先将text的内容用变量保存，combo_click事件后再combo.text=变量.