Ver Mensaje Individual
  #2 (permalink)  
Antiguo 08/08/2010, 11:06
DIEFRA
 
Fecha de Ingreso: julio-2008
Mensajes: 99
Antigüedad: 15 años, 9 meses
Puntos: 1
Sonrisa Respuesta: Plantilla Lista telefonica

Cita:
'Aqui reviso que todos los campos esten llenos, como se puede ver, solo tengo hasta el textbox4 que 3 y 4 son CODIGO TELF
If TextBox1 = Empty Or TextBox2 = Empty Or TextBox3 = Empty Or TextBox4 = Empty Then
MsgBox prompt:="No deje ningun campo vacio", Buttons:=vbOKOnly, Title:="Campo vacio"
Exit Sub
End If
Si te entendi, solo tienes que borrar la condicion de los texbox 3 y 4, así:

Cita:
'Aqui reviso que todos los campos esten llenos, como se puede ver, solo tengo hasta el textbox4 que 3 y 4 son CODIGO TELF
If TextBox1 = Empty Or TextBox2 = Empty Then
MsgBox prompt:="No deje ningun campo vacio", Buttons:=vbOKOnly, Title:="Campo vacio"
Exit Sub
End If