将JAVASCRIPT转为VB

<script language=javascript>
//<!--
function getHrefs(str) {
var links,tmp,pos;
links="";
str=str.replace(/\r|\n/g," "); //剔除字符串中的回车换行
while (true) {
pos=str.search(/<a .*href\s*=\s*/i); //找<a XXX href=XXX形式的字符串(避免分析link href=xxx样子的字符串)
if (pos<0) break;
str=str.substr(pos+2); //将<a 及其以前的部分去掉
pos=str.search(/ href\s*=\s*/i); //找 href=XXX形式的字符串
if (pos<0) break;
str=str.substr(pos); //将href以前的部分去掉
pos=str.search(/<\/a>/i); //找</a>
if (pos<0) break;
tmp=str.substring(0,pos+4); //截取包含链接的字符串
tmp=getHref(tmp); //参数tmp的形式：href=aaaa xxx>yyyy</a>
if (tmp) {links += tmp+"\n\r";}
str=str.substr(pos+4);

将JAVASCRIPT转为VB 如何将VB转为C#代码 各位高手，请将此vb代码转为c#的 翻译：Javascript To VB 将ntfs转为fat32 delphi代码转为VB代码 VB 正则 转换成 JavaScript 将视频转为GIF图片 如何将英文转为中文？ 如将直线转为圆弧