![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
15/03/2010, 16:39
|
![Avatar de abrahamvj](http://static.forosdelweb.com/customavatars/avatar144758_1.gif) | | | Fecha de Ingreso: julio-2006 Ubicación: Lima, Peru
Mensajes: 708
Antigüedad: 18 años, 6 meses Puntos: 18 | |
Respuesta: recorrer textbox y combobox Dim objeto As Object
For Each objeto In Me.Controls
Select Case TypeName(objeto)
Case "TextBox"
If objeto = "" Then
MsgBox "El " & objeto.Name & " esta vacio"
End If
Case "ComboBox"
If objeto = "" Then
MsgBox "El " & objeto.Name & " esta vacio"
End If
End Select
Next objeto
Abraham |