如何保存这种链接地址到变量

〈a href='http://look.aspx#' onclick="OpenBook(202,1,'')" 〉书名〈/a〉
如何保存这种链接地址到变量。仅保存，不打开。 dim s as string
s="〈a href='http://look.aspx#' onclick="OpenBook(202,1,'')" 〉书名〈/a〉" dim s as string
s="〈a href='http://look.aspx#' onclick=""OpenBook(202,1,'')"" 〉书名〈/a〉"

补充：VB ,  基础类