Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim flag As Boolean = FindControl(dynamicDTP)
        If flag = True Then
            dynamicDTP.Location = New System.Drawing.Point(14, 100)
            dynamicDTP.Name = "dateTimePicker2"
            dynamicDTP.Width = 200
            dynamicDTP.Height = 25
            dynamicDTP.Visible = True
            Controls.Add(dynamicDTP)
        End If
    End Sub