Как программно изменить Style для элемента ComboBox? - VB

Формулировка задачи:

Для элемента ComboBox нужно изменить Style (style=0 или 1) выбором из элемента ListBox. Помогите, не могу сообразить, как исправить ошибку. При компиляции выдается «Can't assign to read-only property»

Private Sub List1_Click()
If  List1.ListIndex=0 Then  Combo1.Style = 0
Else: Comdo1.Style = 1
End Sub

Решение задачи: «Как программно изменить Style для элемента ComboBox?»

textual
                            Листинг программы 
                        

                            Dim curValue As Long
 
Private Sub Combo1_Click()
curValue = Combo1.ListIndex
End Sub
 
Private Sub Combo1_KeyPress(KeyAscii As Integer)
IF Izmenenie = True THEN Combo1.List(curValue) = Combo1.Text
End Sub
                        

Оцени полезность:

8 голосов , оценка 4.125 из 5

Похожие ответы