Hey, I was wondering if someone could help me convert this from PHP to VB script.
Thanks in advance

Code:
foreach($file as $value) {
   $fval .= $value;
}

if(preg_match_all('/<td><a href="hiscoreuser.cgi?.*&category=.*" class=c>(.*)<\/a><\/td>/', $fval, $matches)) {
   $i = 0;
   foreach($matches as $value) {
       foreach($value as $value) {
           if($i == 1) {
               $skill[] = $value;
           }
       }
       $i++;
   }
}

if(preg_match_all('/<td align="right">\n(.*)\n<\/td><td/', $fval, $matches)) {
   $i = 0;
   foreach($matches as $value) {
       foreach($value as $value) {
           if($i == 1) {
               $level[] = $value;
           }
       }
       $i++;
   }
}

function skill($sskill) {
   global $skill, $level;
   if(!isset($skill)) {
       return '--';
   }
   else {
       foreach($skill as $key => $value) {
           if($value == $sskill) {
               return $level[$key];
               $i = 1;
           }
       }
       if(!isset($i)) {
           return '--';
       }
   }
}

$overall = skill('Overall');
$attack = skill('Attack');
$defence = skill('Defence');
$strength = skill('Strength');
$hitpoints = skill('Hitpoints');
$ranged = skill('Ranged');
$prayer = skill('Prayer');
$magic = skill('Magic');
$cooking = skill('Cooking');
$woodcutting = skill('Woodcutting');
$fletching = skill('Fletching');
$fishing = skill('Fishing');
$firemaking = skill('Firemaking');
$crafting = skill('Crafting');
$smithing = skill('Smithing');
$mining = skill('Mining');
$herblore = skill('Herblore');
$agility = skill('Agility');
$thieving = skill('Thieving');
$slayer = skill('Slayer');
$runecrafting = skill('Runecrafting');