Anyone know if an ASCII to EBCDIC routine in VB?

Thanks,
Jon