Cuál es el fallo?
 

Esta línea me da error, creo que es un problema de las comillas

dim Inici as string = "<script language=javascript> "onclick="this.style.behavior='url(#default#homepa ge)';this.setHomePage('http://pagina.com');
"<" & "/script>"

(todo seguido)

Alguien me puede ayudar
Gracias

Es que no estás concatenando bien el string:

dim Inici as string = "<script language=javascript> "onclick=" <-- aca hay 3 comillas!

Recordá que los strings van encerrados entre comillas y concatenados (juntados) con &

BIEN --> dim str as String = "primer párrafo" & " - segundo párrafo"

MAL --> dim str as String = "primer párrafo" - segundo párrafo"

Seguro que con una revisión podrás corregir el error, saludos