Well, shoot, looking again at your code, NO PLACE are you even *TRYING* to get the .Text of the two drop downs!
See my code example:
TextBox1.Text = "learnAdvertisement? " & learnAdvertisement.Checked & vbNewLine _
& "learnPrintBox? " & learnPrintBox.Checked & vbNewLine _
& "learnPrint : " & learnPrint.Text & vbNewLine _
& "learnDigitalBox? " & learnDigitalBox.Checked & vbNewLine _
& "learnDigital : " & learnDigital.Text
Those two in red are getting the selected value of the two dropdowns!