vb源码，md5加密。请笑纳。