Visual Basic - Error en DHTML

Tengo el siguiente codigo en el diseñador de una pagina DHTML
con lo cual pretendia hacer visibles los parrafos mediante
el suceso onclick

la pagina cuenta con algunos parrafos los cuales tiene como
propiedad id

Elemento2Menu
Elemento3Menu
Elemento4Menu

Pero ejecuto tal codigo de cae en la linea

Elemento2Menu.Style.display = IIf(NewValue, "", "none")

del codigo que entrego completo mas abajo

el error que me da es elsiguiente

"se requiere un objeto", por lo que desduzco que
elemento Elemento2Menu debe ser inicializado de algun modo
el que no se

Aqui va el codigo completo


Private Sub DHTMLPage_Load()
SetVisibility False
End Sub
Private Sub SetVisibility(NewValue As Boolean)
Elemento2Menu.Style.display = IIf(NewValue, "", "none")
Elemento3Menu.Style.display = IIf(NewValue, "", "none")
Elemento4Menu.Style.display = IIf(NewValue, "", "none")
End Sub

Private Function MenuPrincipal_onclick() As Boolean
If Elemento1Menu.Style.visibility = "hidden" Then
SetVisibility True
Else
SetVisibility False
End If
End Function

Private Function TextField1_onclick() As Boolean

End Function


Muchisimas Gracias