Combobox DropDown kapatma

[derisa963]

Merhabalaar.
Ben combobox umun açılır kutusunu comb1.DropDown ile açıyorum fakat bu açılır kutuyu kapatacak bir kod bulamıyorum varmıdır ki ?

 

[Haluk]

Şöyle bir şey olabilir ....

CommandButton1 sizin dediğiniz gibi ComboBox1 listesini açar, CommandButton2 ise kapar.

Private Sub CommandButton1_Click()
    ComboBox1.DropDown
End Sub
'
Private Sub CommandButton2_Click()
    Me.Repaint
End Sub

 

[derisa963]

Şöyle bir şey olabilir ....

CommandButton1 sizin dediğiniz gibi ComboBox1 listesini açar, CommandButton2 ise kapar.

Private Sub CommandButton1_Click()
    ComboBox1.DropDown
End Sub
'
Private Sub CommandButton2_Click()
    Me.Repaint
End Sub

Private Sub ComboBox3_Change() >> olayının içerisindeyken yine ComboBox3 için kapat ve aç yaptırabilirmiyiz peki ?

 

[tamer42]

Merhaba,
ComboBox dropdown açılma ve kapanma özelliğini;
Combobox içeriğine bağlı olarak değişmesini istiyordum,
Aşağıdaki gibi bir yöntem buldum ama; çok amatör geldi bana;
Bunu daha profesyonel bir yöntem olabilir mi?
Teşekkürler, iyi çalışmalar.

Private Sub ComboBox1_Change()

If Len(Me.ComboBox1.Value) > 3 Then
    Me.ComboBox1.DropDown
Else
   Me.ComboBox1.Visible = False
    Me.ComboBox1.Visible = True
End If

End Sub