List boxes not displaying choices

Hello all. I'm very new to the VB experience and am having trouble getting the choices in my list boxes to show up.

Here's my code.

Private Sub UserForm1_Initialize()
    txtJobNumber.Value = ""
    txtCustomer.Value = ""
    txtProject.Value = ""
    txtDeliverTo.Value = ""
    txtWantedby.Value = ""
    txtSchedbuildon.Value = ""
    txtScheduledon.Value = ""
    txtEsthrs.Value = ""
    cboStatus.Value = ""
    With cboSalesman
        .AddItem "SL"
        .AddItem "MG"
        .AddItem "WC"
    End With
    cboSalesman.Value = ""
    With cboDesigner
        .AddItem "MS"
        .AddItem "BA"
        .AddItem "JM"
        .AddItem "DH"
        .AddItem "DR"
        .AddItem "DC"
    End With
    cboDesigner.Value = ""
    With cboStatus
        .AddItem "Des"
        .AddItem "TRP"
    End With
    cboStatus.Value = ""
    With cboJobtype
        .AddItem "Res"
        .AddItem "Com"
        .AddItem "PB"
        .AddItem "Add"
    End With
    cboJobtype.Value = ""
    txtJobNumber.SetFocus
End Sub

Am I missing something?

Thanks!