Question

VB COMBBOX控件 怎样设置属性，不能修改内容，只能选择，也能复制其中的内容

如题，VB COMBBOX控件 怎样设置属性，不能修改文本内容，可以从下拉列表选择并显示在文本框中，也能复制其中的内容，请教高手

Answer 1

'如果设置combo1.Style =2，虽然不能修改，只能选择，但不能复制
'以下变通方法可以达到目的
Dim Combo_txt As String
Private Sub Combo1_Change()
Combo1.Text = Combo_txt
End Sub
Private Sub Combo1_Click()
Combo_txt = Combo1.Text
End Sub
Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer)
Combo_txt = Combo1.Text
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 5
    Combo1.AddItem i
Next
Combo1.ListIndex = 0
End Sub

Answer 2

把COMBBOX的locked设置成true就无法修改了，编辑他的list就可以显示文本了，求采纳！