This is all the details needed IMHO.

    Dim ctl As Control
    For Each ctl In Me.Controls
        If TypeName(ctl) = "TextBox" Then
            If ctl = Empty Then
                MsgBox "A text box is empty.", , "Missing Entry"
                Exit For
            End If
        End If
    Next ctl