[cameleon69]

Bon je viens vite fait de faire un test chez moi.

Voici le genre de code que tu dois mettre pour tester si tous les controles TEXTBOX sont bien différents de vide.

 
Private Sub Form_Unload(Cancel As Integer)
Dim ctrl As Control
For Each ctrl In Me.Controls
	'je recherche que les controles de type Textbox
	If TypeOf ctrl Is TextBox Then
		'si le controle est vide alors je sors de la boucle 
		'et j'empeche la fermeture de la form
		If ctrl.Text = "" Then
			 Cancel = 1
			 'message informant d'une erreur
			 MsgBox "Vous devez remplir tous les champs obligatoires.",,"Erreur de saisie"
			 Exit For		
		End if
	End If
Next ctrl
End Sub

Voila qui devrait répondre à ta demande.
Cette méthode teste tous les controles de la form et si c'est une textbox elle vérifie que la textbox n'est pas vide, si tel est le cas à la première rencontrée elle sort de la boucle et ne ferme pas la fenêtre.
Bien entendu tu peux mettre un message à l'aide d'une msgbox avant le Exit For.