如何让combo.text只读，不能修改，又能在下拉框里选择？
style=2时第一个text就没了，,,locked=true又没法选择了。

combo1.style 设为2

Private Sub Form_Load()
Combo1.List(0) = "000"
Combo1.List(1) = "111"
Combo1.List(2) = "222"
Combo1.Text = Combo1.List(0)
End Sub

[ 本帖最后由 lianyicq 于 2014-12-1 09:35 编辑 ]

可以用2楼的法子，也可在设计时直接在List属性里写进001、002、003等数据，输入时按住Ctrl再回车。

[ 本帖最后由 zhengang1026 于 2014-12-1 14:09 编辑 ]

还可以，就是 Combo1.Text=“字符” 不行

不能用字符?你试试.难道COMBO下拉里不能显示"湖南 山东 四川..."?只有数字让我们挑.
.text是只读属性.在list()中选取对应项


[ 本帖最后由 lianyicq 于 2014-12-1 15:09 编辑 ]

当然可以选择字符，其实001、002、003等也是字符啊

combo1.style 设为2

Private Sub Form_Load()
Combo1.List(0) = "000"
Combo1.List(1) = "111"
Combo1.List(2) = "222"
Combo1.Text = "请选择"
End Sub
这样不行。

这样是不行，除非
combo1.list(3)="请选择"
在后续判断具体选哪行的时候，再用代码处理选择为“请选择”的情况，比如说弹出msgbox

可在combo 控件上方加一个Label，将Label的Caption属性改为：请选择。就行了

也用代码控制,在change事件中加

Private Sub Combo1_Change()
  Combo1 = "请选择"
End Sub