Visual Basic.NET - Función que limpia TextBox dentro de un Groupbox

   
Vista:

Función que limpia TextBox dentro de un Groupbox

Publicado por Miguel (56 intervenciones) el 14/02/2014 09:41:27
Función para limpiar los textBox dentro de un GroupBox. Quiza no he aportado todo lo necesario así que lo completo ahora,

Como función que esta dentro del proyecto.

Sub limpiarCajas()
Limpiar_Textos(gbDatos)
End Sub

Asi funciona correctamente.

Ahora dentro del proyecto está como una dll.

Sub limpiarCajas()
Dim vacio As New clsLimpiar
vacio.Limpiar_Textos(gbDatos)
End Sub

Entonces muestra este error en (gbDatos)

Un valor de tipo "System.Windows.Forms.GroupBox" no se puede convertir en "LimpiaTexto,Windows.Forms.GropBox".

Adjunto tambien la función.

Namespace TextoVacio
Public Class clsLimpiar
Public Sub Limpiar_Textos(ByVal Grupo As Windows.Forms.GroupBox)
Dim miControl As Object
Try
'Limpia los TextBox que estan dentro de un GroupBox
For Each miControl In Grupo.Controls
If miControl.GetType Is GetType(LimpiaTexto.Windows.Forms.GroupBox) Then
miControl.Clear()
End If
System.Windows.Forms.Application.DoEvents()
Next
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub

Private Function MessageBox() As Object
Throw New Global.System.NotImplementedException
End Function
End Class
End Namespace

Un saludo y muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder