Outputting into a label

[XxLithiumxX]

Okai, I have a proggram that is used to input names into a combo box, but i need to output them in a lable,

 Private Sub cboName_Change()
    lblOut = cboName
 
 
End Sub
 
Private Sub cmbAdd_Click()
    cboName = txtAdd
    cboName.AddItem (cboName)
    txtAdd = ""
End Sub
 
Private Sub txtAdd_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
    cboName = txtAdd
    cboName.AddItem (cboName)
    txtAdd = ""
End If
End Sub
 

That is what i have so far someone please tell me how to select a input from the list inside the combo box and show in a lable

also, a quick help on how to save would be helpfull

Thanks
Sean

p.s Sorry this makes little sence

[Killer42]

Here's a quickie which might help. Not sure, but this might only work properly if the style of your combo box is "dropdown listbox".

Private Sub CboName_Click()
  lblOut = CboName.Text
End Sub