...怎样设置属性,不能修改内容,只能选择,也能复制其中的内容_百度知 ...

发布网友发布时间：2024-10-05 13:18

共2个回答

热心网友时间：2024-10-08 04:40

'如果设置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

热心网友时间：2024-10-08 04:33

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

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com