15/03/2010, 16:39
|
 | | | Fecha de Ingreso: julio-2006 Ubicación: Lima, Peru
Mensajes: 708
Antigüedad: 18 años, 4 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 |