Here's what I tried...
Dim ACADHYPERLINK As Object
Set ACADHYPERLINK = acadDoc.ACADHYPERLINK
For Each ACADHYPERLINK In acadDoc
ACADHYPERLINK.Delete
Next ACADHYPERLINK
...needless to say, it didn't work.
Just for the understanding side of it, the reason that won't work is that what you are telling VB is that it's going to iterate through everything in the drawing AND that everything in the drawing that it will find is a hyperlink. The first thing it gets to that isn't a hyperlink, the program says, "Hey, this isn't a hyperlink you. I think I'm going to toss the binky."
The only time that code would work is if you had a drawing that contained absolutely nothing but hyperlinks which won't ever ever happen for two reasons.
1) paperspace and modelspace are both blocks and you can't get rid of them.
2) you can't have a hyperlink in a drawing. Hyperlinks are attached to objects, not objects in their own right.
Make sense?