Creamos nuestra Function
Public Function valCajaVacias(groupContenedor As GroupBox) As Boolean
Try
Dim Cadena As String
For Each _TextBox As Control In groupContenedor.Controls 'Debes verificar en que contendor están lo controles TextBox, en este caso esta dentro de un GroupBox
If TypeOf _TextBox Is Windows.Forms.TextBox Then
If _TextBox.Text.Length = 0 Then
Cadena = String.Format("Campo requerido: {0}.", _TextBox.Name)
Return sistemaError(Cadena)
End If
End If
Next
Return False
Catch ex As Exception
Return False
sistemaError(ex.Message)
End Try
End Function
En nuestro formulario llamamos a nuestra function valCajaVacias ya sea dentro del boton Grabar, En mi caso mi function esta dentro de un Module no es necesario instanciar.
Ya que nuestra function la hemos establecido de tipo Boolean. realizamos lo siguiente
If valCajaVacias(namecontenedordondeestanlostextbox) = False Then
'Correcto
End If