in syntaxPost function,
1. Add global variable just below $IsCodeInPost variable, define as array of codetype, and initilize to zero (0). like below:

global $CodeType;

$CodeType = array (”cpp”=> 0, “csharp”=>0, “css” => 0, “delphi” => 0,”java”=>0, “jscript” => 0, “php”=> 0, “python”=>0, “ruby” => 0, “sql” => 0, “vb”=> 0, “xml” => 0);

2. In loop to search/replace [source] add the following code to set the CodeType match to 1

foreach( $theSources[2] as $sourceID => $sourceBlock ) {
$theBrush= ……
.
$CodeType[$theBrush] = 1;
}

in syntaxFooter: check if $CodeType["vb"] if its value is 1 then include shBrushVb.js and none otherwise.

ok, hope this help.
i have practiced it in my pemikiran.com, i will send the modified code if you like.

i have a sugestion for the improvement if you like.
in the syntaxFooter, you enable all the js from shCore.js to shBrushCpp.js, that the size about 37 kb. but we don’t use it all. maybe just cpp, vb or other but not all in one page.

When a user ( web surfer ) find your page, he/she download all 37kb but not use all of this.

the sugestion, maybe you can filter which language use, so just include js that support. for example if the source language just use vb , you just include shCore.js, shBrushVb.js, SyntaxHighlighter.css and clipboard.swf that about 18kb.

hope help