userform did not hide

[jaimuthu]

Private Sub OptionButton1_Click()
 If CheckBox7.Value = 0 Then
        If CheckBox3.Value Then
            ThisDrawing.SendCommand "BR0 "
        ElseIf CheckBox4.Value Then
            ThisDrawing.SendCommand "BR1 "
            ElseIf CheckBox5.Value Then
            ThisDrawing.SendCommand "BR2 "
            ElseIf CheckBox6.Value Then
            ThisDrawing.SendCommand "BR3 "
        End If
    Else
        If CheckBox3.Value Then
            ThisDrawing.SendCommand "BR0PL "
        ElseIf CheckBox4.Value Then
            ThisDrawing.SendCommand "BR1PL "
            ElseIf CheckBox5.Value Then
            ThisDrawing.SendCommand "BR2PL "
            ElseIf CheckBox6.Value Then
            ThisDrawing.SendCommand "BR3PL "
        End If
    End If
    
    UserForm1.Hide
End Sub

i create this code calling lisp command using vba its work perfect in autocad 2006 in autocad 2021 i pick checkbox3   the userform1 didnot hide but command is send 

[paullimapa]

Will get better feedback posting here

https://forums.autodesk.com/t5/vba/bd-p/33/page/2