help with combobox

[liuyang]

Hi
Just tried it out, works fine.

 
Dim j as integer 
Private Sub Form_Load()
	Combobox1.Clear
	For J = 1 To 10
		Combobox1.AddItem J
	Next J
	Combobox1.Text = Combobox1.List(0)
End Sub

Cheers
Karsten