Public Class usrCntlSND_Handling Public Sub reset() txtATA.Text = "" txtATCMRNFremd.Text = "" End Sub End Class