31/05/2006, 07:05
|
 | Usuario no validado | | Fecha de Ingreso: marzo-2005
Mensajes: 194
Antigüedad: 20 años Puntos: 0 | |
| Mira lo que tambien podrias hacer y este revisa desde el primer control que encuentra y tambien depende del TabIndex que le pongas por que este te va a entregar el posicionamiento de un control en el formulario principal
Dim i As Control
For i=0 to Controls.Count-1
If TypeName(i) = "TextBox" Or TypeName(i) = "ComboBox" Then
If Len(i.Text) = 0 Then
MsgBox "Faltan datos en " & i.Tag
Exit Sub
End If
End If
Next i
MsgBox "Todos llenos"
Ojala te sirva y sea lo que buscas |