Block In VB Database Program To Comple All Task?

I have a function coded for on_click operation and it is not cycling all the way through. I have moved various "If" block controls as well as the code itself around several times and I can not figure out how to get it to go all the way through.

As of now, it will check to see if the Company Name is in the database, then check to see if the field is blank, then check to make sure the zip code box is numeric. That's as far as the code goes. I can not get it to cycle through and actually add the row to the database. If I move various lines of codes around, I can get it to add the row, but it will allow the errors such as incorrect zip format as well as blank values also. I need the code to perform the checks, then if all entry is valid, it adds the row.

I am only working on one form as of now, but this exact problem will be applied to several other forms within my overall project. However, if I can not get this one form to work, I will not be able to get the others to work either.

[Code]...