Invalid use of null (Self resolved)

When I use this code and delete all my records I get an invalid use of null error message any ideas what's wrong?

(Nb Text19 is how many records to delete)

VB Code:

Do While Text19.Value >= 1
        DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
        DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
        Text19.Value = Text19.Value - 1
    Loop
    End If
    End If

In the absence of another reply, my suggestion is that the problem is due to the fact that a text box contains text and you are trying to use it like a number.

It's ok I solved it, and no what you said is wrong for the reason that VBA in access will not allow you to use .text (due to a glitch) and instead you have to use .value

The problem with the code was actually, in the bit I didn't put on the site ;)

lol
Thanx anyway, Bazz