To handle the Lines in your UserForm, you can use the Visible property :
Code
Private Sub cmdClear_Click()
Dim ctrl As Control
For Each ctrl In UserForm1.Controls
If TypeName(ctrl) = "Label" Then
'Identify Lines and change Visible '
If Left(ctrl.Name, 4) = "Line" Then
ctrl.Visible = False
End If
End If
Next ctrl
End Sub