Hmm. Im not experienced with regex, which may be hekpfull here. But this should work just fine...
Code:
on @*:join:#chan: { if (($left($nick,1) isupper) && ($right($nick,2) isnum)) { kick $chan $nick Virus } }

Good luck.