Skrive i combobox ?

Du skal sætte listindex > -1

Private Sub Form_Load()
  'Combo1.Style = 0
  Combo1.Text = ""
End Sub

virker ikke :-(

set Style til 0 så kan du skrive i din combobox

der skal ikke skrives, men vises nogle data, som der kan vælges mellem
problemet er at når formen vises ser det ca sådan ud

blank og når den rulles ud = blank
                            data1
                            data2
                            osv..

hmm, ikke det store talent for at illustrere :-(
data skulle være unde blank

prøv noget af dette:

Private Sub Form_Load()
'Set Combo1.Style = 2
  For i = 1 To 10
    Combo1.AddItem "data" & i
  Next
End Sub



Private Sub Form_Load()
'Set Combo1.Style = 2
  For i = 1 To 10
    Combo1.AddItem "data" & i
  Next
  Combo1.ListIndex = 0
End Sub

den sidste virkede, takker :-)

selv tak