Hi guys

sorted it i think i am useing a listbox as suggested but mimiced a combo box with a resized command button and the following code

Code:
Private Sub Command2_Click()
If List1.Height = "285" Then
List1.Height = "2985"
Else
If List1.Height = "2985" Then
List1.Height = "285"
End If
End If
End Sub
have not checked the funtionality of the listbox yet but it looks remarkably like a combox box when clicked