doesnot hide userfrom1 how to solve this problem

[MUTHUKUMAR1983]

Private Sub CommandButton1_Click()

Dim FN As String
Dim LN As Double

FN = TextBox3.Value
LN = TextBox4.Value

ThisDrawing.SendCommand "tk" & Chr(10) & FN & Chr(10) & LN & Chr(10)
UserForm1.Hide
TextBox3.Value = Clear
TextBox4.Value = Clear
'TextBox3.SetFocus



End Sub

Private Sub Frame1_Click()

End Sub

Private Sub TextBox1_Change()
ThisDrawing.SetVariable "USERS1", TextBox1.Value
End Sub

Private Sub TextBox2_Change()
ThisDrawing.SetVariable "USERS2", TextBox2.Value
End Sub

Private Sub TextBox3_Change()

End Sub