Módulo Gestión: Borrar datos antes de pulsar Aceptar

Bueno, y que ocurre que si mientras estamos introduciendo los datos queremos borrar lo que hemos introducido. Habria dos soluciones

1. Borrar manual mente todos los textbox
2. Utilizar el siguiente codido al hacer click en el boton “Borrar”

PUBLIC SUB ButtonBorrar_Click()

PictureBoxFoto.Picture = Picture["icon:/96/gambas"]

TextBoxDNI.text = ""

TextBoxNombre.text = ""

TextBoxApellidos.text = ""

TextBoxEmpresa.text = ""

TextBoxPuesto.text = ""

TextBoxTelfEmpresa.text = ""

TextBoxTelfParticular.text = ""

TextBoxFax.text = ""

TextBoxMovilEmpresa.text = ""

TextBoxMovilParticular.text = ""

TextBoxWEB.text = ""

PictureBoxFoto.Picture = ""

TextBoxDireccion.text = ""

TextBoxObs.text = ""

TextBoxFecha.text = ""

TextBoxCorreo.text = ""

END