汉字转拼音再转ASCII
【简介】感谢网友“destiny”参与投稿，以下是小编为大家准备了汉字转拼音再转ASCII（共10篇），欢迎参阅。
篇1：汉字转拼音再转ASCII
汉字可以转成拼音，可以在转成ASCII码，然后就可以转成十六进制数，再就可以转成0和1组成的二进制帧了！
比如说：
我爱你
-> wo ai ni
-> 119 111 32 97 105 32 110 105
->77 6F 20 61 69 20 6E 69
->0111 0111 0110 1111 0010 0000 0110 0001 0110 1001 0010 0000 0110 1110 0110 1001
看上去很吊的样子，估计发报就是这么干的！
package com.example.xiaoyi.utils;import android.text.TextUtils;import android.util.Log;import java.text.Collator;import java.util.ArrayList;import java.util.HashMap;import java.util.Locale;/** * An object to convert Chinese character to its corresponding pinyin string. For characters with * multiple possible pinyin string, only one is selected according to collator. Polyphone is not * supported in this implementation. This class is implemented to achieve the best runtime * performance and minimum runtime resources with tolerable sacrifice of accuracy. This * implementation highly depends on zh_CN ICU collation data and must be always synchronized with * ICU. * * Currently this file is aligned to zh.txt in ICU 4.6 */public class HanziToPinyin { private static final String TAG = “HanziToPinyin”; // Turn on this flag when we want to check internal data structure. private static final boolean DEBUG = false; /** * Unihans array. Each unihans is the first one within same pinyin. Use it to determine pinyin * for all ~20k unihans. */ public static final char[] UNIHANS = {'u5475', 'u54ce', 'u5b89', 'u80ae', 'u51f9','u516b', 'u6300', 'u6273', 'u90a6', 'u5305', 'u5351', 'u5954', 'u4f3b','u5c44', 'u8fb9', 'u6807', 'u618b', 'u90a0', 'u69df', 'u7676', 'u5cec','u5693', 'u5a47', 'u98e1', 'u4ed3', 'u64cd', 'u518a', 'u5d7e', 'u564c','u53c9', 'u9497', 'u8fbf', 'u4f25', 'u6284', 'u8f66', 'u62bb', 'u67fd','u5403', 'u5145', 'u62bd', 'u51fa', 'u6b3b', 'u63e3', 'u5ddd', 'u75ae','u5439', 'u6776', 'u9034', 'u75b5', 'u5306', 'u51d1', 'u7c97', 'u6c46','u5d14', 'u90a8', 'u6413', 'u5491', 'u5927', 'u75b8', 'u5f53', 'u5200','u6dc2', 'u5f97', 'u6265', 'u706f', 'u6c10', 'u55f2', 'u7538', 'u5201','u7239', 'u4ec3', 'u4e1f', 'u4e1c', 'u5517', 'u561f', 'u5073', 'u5806','u9413', 'u591a', 'u5a40', 'u8bf6', 'u5940', 'u97a5', 'u800c', 'u53d1','u5e06', 'u65b9', 'u98de', 'u5206', 'u4e30', 'u8985', 'u4ecf', 'u7d11','u4f15', 'u65ee', 'u8be5', 'u7518', 'u5188', 'u768b', 'u6208', 'u7d66','u6839', 'u5e9a', 'u5de5', 'u52fe', 'u4f30', 'u74dc', 'u7f6b', 'u5173','u5149', 'u5f52', 'u886e', 'u5459', 'u54c8', 'u54b3', 'u9878', 'u82c0','u84bf', 'u8bc3', 'u9ed2', 'u62eb', 'u4ea8', 'u5677', 'u543d', 'u9f41','u5322', 'u82b1', 'u6000', 'u72bf', 'u5ddf', 'u7070', 'u660f', 'u5419','u4e0c', 'u52a0', 'u620b', 'u6c5f', 'u827d', 'u9636', 'u5dfe', 'u52a4','u5182', 'u52fc', 'u530a', 'u5a1f', 'u5658', 'u519b', 'u5494', 'u5f00','u520a', 'u95f6', 'u5c3b', 'u533c', 'u524b', 'u80af', 'u962c', 'u7a7a','u62a0', 'u5233', 'u5938', 'u84af', 'u5bbd', 'u5321', 'u4e8f', 'u5764','u6269', 'u5783', 'u6765', 'u5170', 'u5577', 'u635e', 'u4ec2', 'u52d2','u5844', 'u5215', 'u5006', 'u5941', 'u826f', 'u64a9', 'u5217', 'u62ce','u3007', 'u6e9c', 'u9f99', 'u779c', 'u565c', 'u5a08', 'u7567', 'u62a1','u7f57', 'u5463', 'u5988', 'u973e', 'u5ada', 'u9099', 'u732b', 'u9ebc','u6c92', 'u95e8', 'u753f', 'u54aa', 'u7720', 'u55b5', 'u54a9', 'u6c11','u540d', 'u8c2c', 'u6478', 'u54de', 'u6bea', 'u62cf', 'u5b7b', 'u56e1','u56ca', 'u5b6c', 'u8bb7', 'u9981', 'u6041', 'u80fd', 'u59ae', 'u62c8','u5b22', 'u9e1f', 'u634f', 'u60a8', 'u5b81', 'u599e', 'u519c', 'u7fba','u5974', 'u597b', 'u8650', 'u632a', 'u5594', 'u8bb4', 'u8db4', 'u62cd','u7705', 'u4e53', 'u629b', 'u5478', 'u55b7', 'u5309', 'u4e15', 'u504f','u527d', 'u6c15', 'u59d8', 'u4e52', 'u948b', 'u5256', 'u4ec6', 'u4e03','u6390', 'u5343', 'u545b', 'u6084', 'u767f', 'u4fb5', 'u9751', 'u909b','u4e18', 'u66f2', 'u5f2e', 'u7f3a', 'u590b', 'u5465', 'u7a63', 'u5a06','u60f9', 'u4eba', 'u6254', 'u65e5', 'u8338', 'u53b9', 'u5982', 'u5827','u6875', 'u95f0', 'u82e5', 'u4ee8', 'u6be2', 'u4e09', 'u6852', 'u63bb','u8272', 'u68ee', 'u50e7', 'u6740', 'u7b5b', 'u5c71', 'u4f24', 'u5f30','u5962', 'u7533', 'u5347', 'u5c38', 'u53ce', 'u4e66', 'u5237', 'u6454','u95e9', 'u53cc', 'u8c01', 'u542e', 'u5981', 'u53b6', 'u5fea', 'u635c','u82cf', 'u72fb', 'u590a', 'u5b59', 'u5506', 'u4ed6', 'u82d4', 'u574d','u94f4', 'u5932', 'u5fd1', 'u71a5', 'u5254', 'u5929', 'u4f7b', 'u5e16','u5385', 'u56f2', 'u5077', 'u92c0', 'u6e4d', 'u63a8', 'u541e', 'u6258','u6316', 'u6b6a', 'u5f2f', 'u5c2a', 'u5371', 'u586d', 'u7fc1', 'u631d','u5140', 'u5915', 'u867e', 'u4eda', 'u4e61', 'u7071', 'u4e9b', 'u5fc3','u661f', 'u51f6', 'u4f11', 'u65f4', 'u8f69', 'u75b6', 'u52cb', 'u4e2b','u6079', 'u592e', 'u5e7a', 'u8036', 'u4e00', 'u6b2d', 'u5e94', 'u54df','u4f63', 'u4f18', 'u625c', 'u9e22', 'u66f0', 'u6655', 'u531d', 'u707d','u7ccc', 'u7242', 'u50ae', 'u5219', 'u8d3c', 'u600e', 'u5897', 'u5412','u635a', 'u6cbe', 'u5f20', 'u948a', 'u8707', 'u8d1e', 'u4e89', 'u4e4b','u4e2d', 'u5dde', 'u6731', 'u6293', 'u8de9', 'u4e13', 'u5986', 'u96b9','u5b92', 'u5353', 'u5b5c', 'u5b97', 'u90b9', 'u79df', 'u94bb', 'u539c','u5c0a', 'u6628', }; /** * Pinyin array. Each pinyin is corresponding to unihans of same offset in the unihans array. */ public static final byte[][] PINYINS = {{ 65, 0, 0, 0, 0, 0 }, { 65, 73, 0, 0, 0, 0 }, { 65, 78, 0, 0, 0, 0 },{ 65, 78, 71, 0, 0, 0 }, { 65, 79, 0, 0, 0, 0 }, { 66, 65, 0, 0, 0, 0 },{ 66, 65, 73, 0, 0, 0 }, { 66, 65, 78, 0, 0, 0 }, { 66, 65, 78, 71, 0, 0 },{ 66, 65, 79, 0, 0, 0 }, { 66, 69, 73, 0, 0, 0 }, { 66, 69, 78, 0, 0, 0 },{ 66, 69, 78, 71, 0, 0 }, { 66, 73, 0, 0, 0, 0 }, { 66, 73, 65, 78, 0, 0 },{ 66, 73, 65, 79, 0, 0 }, { 66, 73, 69, 0, 0, 0 }, { 66, 73, 78, 0, 0, 0 },{ 66, 73, 78, 71, 0, 0 }, { 66, 79, 0, 0, 0, 0 }, { 66, 85, 0, 0, 0, 0 },{ 67, 65, 0, 0, 0, 0 }, { 67, 65, 73, 0, 0, 0 },{ 67, 65, 78, 0, 0, 0 }, { 67, 65, 78, 71, 0, 0 }, { 67, 65, 79, 0, 0, 0 },{ 67, 69, 0, 0, 0, 0 }, { 67, 69, 78, 0, 0, 0 }, { 67, 69, 78, 71, 0, 0 },{ 67, 72, 65, 0, 0, 0 }, { 67, 72, 65, 73, 0, 0 }, { 67, 72, 65, 78, 0, 0 },{ 67, 72, 65, 78, 71, 0 }, { 67, 72, 65, 79, 0, 0 }, { 67, 72, 69, 0, 0, 0 },{ 67, 72, 69, 78, 0, 0 }, { 67, 72, 69, 78, 71, 0 }, { 67, 72, 73, 0, 0, 0 },{ 67, 72, 79, 78, 71, 0 }, { 67, 72, 79, 85, 0, 0 }, { 67, 72, 85, 0, 0, 0 },{ 67, 72, 85, 65, 0, 0 }, { 67, 72, 85, 65, 73, 0 }, { 67, 72, 85, 65, 78, 0 },{ 67, 72, 85, 65, 78, 71 }, { 67, 72, 85, 73, 0, 0 }, { 67, 72, 85, 78, 0, 0 },{ 67, 72, 85, 79, 0, 0 }, { 67, 73, 0, 0, 0, 0 }, { 67, 79, 78, 71, 0, 0 },{ 67, 79, 85, 0, 0, 0 }, { 67, 85, 0, 0, 0, 0 }, { 67, 85, 65, 78, 0, 0 },{ 67, 85, 73, 0, 0, 0 }, { 67, 85, 78, 0, 0, 0 }, { 67, 85, 79, 0, 0, 0 },{ 68, 65, 0, 0, 0, 0 }, { 68, 65, 73, 0, 0, 0 }, { 68, 65, 78, 0, 0, 0 },{ 68, 65, 78, 71, 0, 0 }, { 68, 65, 79, 0, 0, 0 }, { 68, 69, 0, 0, 0, 0 },{ 68, 69, 73, 0, 0, 0 }, { 68, 69, 78, 0, 0, 0 }, { 68, 69, 78, 71, 0, 0 },{ 68, 73, 0, 0, 0, 0 }, { 68, 73, 65, 0, 0, 0 }, { 68, 73, 65, 78, 0, 0 },{ 68, 73, 65, 79, 0, 0 }, { 68, 73, 69, 0, 0, 0 }, { 68, 73, 78, 71, 0, 0 },{ 68, 73, 85, 0, 0, 0 }, { 68, 79, 78, 71, 0, 0 }, { 68, 79, 85, 0, 0, 0 },{ 68, 85, 0, 0, 0, 0 }, { 68, 85, 65, 78, 0, 0 }, { 68, 85, 73, 0, 0, 0 },{ 68, 85, 78, 0, 0, 0 }, { 68, 85, 79, 0, 0, 0 }, { 69, 0, 0, 0, 0, 0 },{ 69, 73, 0, 0, 0, 0 }, { 69, 78, 0, 0, 0, 0 }, { 69, 78, 71, 0, 0, 0 },{ 69, 82, 0, 0, 0, 0 }, { 70, 65, 0, 0, 0, 0 }, { 70, 65, 78, 0, 0, 0 },{ 70, 65, 78, 71, 0, 0 }, { 70, 69, 73, 0, 0, 0 }, { 70, 69, 78, 0, 0, 0 },{ 70, 69, 78, 71, 0, 0 }, { 70, 73, 65, 79, 0, 0 }, { 70, 79, 0, 0, 0, 0 },{ 70, 79, 85, 0, 0, 0 }, { 70, 85, 0, 0, 0, 0 }, { 71, 65, 0, 0, 0, 0 },{ 71, 65, 73, 0, 0, 0 }, { 71, 65, 78, 0, 0, 0 }, { 71, 65, 78, 71, 0, 0 },{ 71, 65, 79, 0, 0, 0 }, { 71, 69, 0, 0, 0, 0 }, { 71, 69, 73, 0, 0, 0 },{ 71, 69, 78, 0, 0, 0 }, { 71, 69, 78, 71, 0, 0 }, { 71, 79, 78, 71, 0, 0 },{ 71, 79, 85, 0, 0, 0 }, { 71, 85, 0, 0, 0, 0 }, { 71, 85, 65, 0, 0, 0 },{ 71, 85, 65, 73, 0, 0 }, { 71, 85, 65, 78, 0, 0 }, { 71, 85, 65, 78, 71, 0 },{ 71, 85, 73, 0, 0, 0 }, { 71, 85, 78, 0, 0, 0 }, { 71, 85, 79, 0, 0, 0 },{ 72, 65, 0, 0, 0, 0 }, { 72, 65, 73, 0, 0, 0 }, { 72, 65, 78, 0, 0, 0 },{ 72, 65, 78, 71, 0, 0 }, { 72, 65, 79, 0, 0, 0 }, { 72, 69, 0, 0, 0, 0 },{ 72, 69, 73, 0, 0, 0 }, { 72, 69, 78, 0, 0, 0 }, { 72, 79, 85, 0, 0, 0 },{ 72, 77, 0, 0, 0, 0 }, { 72, 79, 78, 71, 0, 0 }, { 72, 79, 85, 0, 0, 0 },{ 72, 85, 0, 0, 0, 0 }, { 72, 85, 65, 0, 0, 0 }, { 72, 85, 65, 73, 0, 0 },{ 72, 85, 65, 78, 0, 0 }, { 72, 85, 65, 78, 71, 0 }, { 72, 85, 73, 0, 0, 0 },{ 72, 85, 78, 0, 0, 0 }, { 72, 85, 79, 0, 0, 0 }, { 74, 73, 0, 0, 0, 0 },{ 74, 73, 65, 0, 0, 0 }, { 74, 73, 65, 78, 0, 0 }, { 74, 73, 65, 78, 71, 0 },{ 74, 73, 65, 79, 0, 0 }, { 74, 73, 69, 0, 0, 0 }, { 74, 73, 78, 0, 0, 0 },{ 74, 73, 78, 71, 0, 0 }, { 74, 73, 79, 78, 71, 0 }, { 74, 73, 85, 0, 0, 0 },{ 74, 85, 0, 0, 0, 0 }, { 74, 85, 65, 78, 0, 0 }, { 74, 85, 69, 0, 0, 0 },{ 74, 85, 78, 0, 0, 0 }, { 75, 65, 0, 0, 0, 0 }, { 75, 65, 73, 0, 0, 0 },{ 75, 65, 78, 0, 0, 0 }, { 75, 65, 78, 71, 0, 0 }, { 75, 65, 79, 0, 0, 0 },{ 75, 69, 0, 0, 0, 0 }, { 75, 69, 73, 0, 0, 0 }, { 75, 69, 78, 0, 0, 0 },{ 75, 69, 78, 71, 0, 0 }, { 75, 79, 78, 71, 0, 0 }, { 75, 79, 85, 0, 0, 0 },{ 75, 85, 0, 0, 0, 0 }, { 75, 85, 65, 0, 0, 0 }, { 75, 85, 65, 73, 0, 0 },{ 75, 85, 65, 78, 0, 0 }, { 75, 85, 65, 78, 71, 0 }, { 75, 85, 73, 0, 0, 0 },{ 75, 85, 78, 0, 0, 0 }, { 75, 85, 79, 0, 0, 0 }, { 76, 65, 0, 0, 0, 0 },{ 76, 65, 73, 0, 0, 0 }, { 76, 65, 78, 0, 0, 0 }, { 76, 65, 78, 71, 0, 0 },{ 76, 65, 79, 0, 0, 0 }, { 76, 69, 0, 0, 0, 0 }, { 76, 69, 73, 0, 0, 0 },{ 76, 69, 78, 71, 0, 0 }, { 76, 73, 0, 0, 0, 0 }, { 76, 73, 65, 0, 0, 0 },{ 76, 73, 65, 78, 0, 0 }, { 76, 73, 65, 78, 71, 0 }, { 76, 73, 65, 79, 0, 0 },{ 76, 73, 78, 0, 0, 0 }, { 76, 73, 78, 0, 0, 0 }, { 76, 73, 78, 71, 0, 0 },{ 76, 73, 85, 0, 0, 0 }, { 76, 79, 78, 71, 0, 0 }, { 76, 79, 85, 0, 0, 0 },{ 76, 85, 0, 0, 0, 0 }, { 76, 85, 0, 0, 0, 0 }, { 76, 85, 69, 0, 0, 0 },{ 76, 85, 78, 0, 0, 0 }, { 76, 85, 79, 0, 0, 0 }, { 77, 0, 0, 0, 0, 0 },{ 77, 65, 0, 0, 0, 0 }, { 77, 65, 73, 0, 0, 0 }, { 77, 65, 78, 0, 0, 0 },{ 77, 65, 78, 71, 0, 0 }, { 77, 65, 79, 0, 0, 0 }, { 77, 69, 0, 0, 0, 0 },{ 77, 69, 73, 0, 0, 0 }, { 77, 69, 78, 0, 0, 0 }, { 77, 69, 78, 71, 0, 0 },{ 77, 73, 0, 0, 0, 0 }, { 77, 73, 65, 78, 0, 0 }, { 77, 73, 65, 79, 0, 0 },{ 77, 73, 69, 0, 0, 0 }, { 77, 73, 78, 0, 0, 0 }, { 77, 73, 78, 71, 0, 0 },{ 77, 73, 85, 0, 0, 0 }, { 77, 79, 0, 0, 0, 0 }, { 77, 79, 85, 0, 0, 0 },{ 77, 85, 0, 0, 0, 0 }, { 78, 65, 0, 0, 0, 0 }, { 78, 65, 73, 0, 0, 0 },{ 78, 65, 78, 0, 0, 0 }, { 78, 65, 78, 71, 0, 0 }, { 78, 65, 79, 0, 0, 0 },{ 78, 69, 0, 0, 0, 0 }, { 78, 69, 73, 0, 0, 0 }, { 78, 69, 78, 0, 0, 0 },{ 78, 69, 78, 71, 0, 0 }, { 78, 73, 0, 0, 0, 0 }, { 78, 73, 65, 78, 0, 0 },{ 78, 73, 65, 78, 71, 0 }, { 78, 73, 65, 79, 0, 0 }, { 78, 73, 69, 0, 0, 0 },{ 78, 73, 78, 0, 0, 0 }, { 78, 73, 78, 71, 0, 0 }, { 78, 73, 85, 0, 0, 0 },{ 78, 79, 78, 71, 0, 0 }, { 78, 79, 85, 0, 0, 0 }, { 78, 85, 0, 0, 0, 0 },{ 78, 85, 65, 78, 0, 0 }, { 78, 85, 69, 0, 0, 0 }, { 78, 85, 79, 0, 0, 0 },{ 79, 0, 0, 0, 0, 0 }, { 79, 85, 0, 0, 0, 0 }, { 80, 65, 0, 0, 0, 0 },{ 80, 65, 73, 0, 0, 0 }, { 80, 65, 78, 0, 0, 0 }, { 80, 65, 78, 71, 0, 0 },{ 80, 65, 79, 0, 0, 0 }, { 80, 69, 73, 0, 0, 0 }, { 80, 69, 78, 0, 0, 0 },{ 80, 69, 78, 71, 0, 0 }, { 80, 73, 0, 0, 0, 0 }, { 80, 73, 65, 78, 0, 0 },{ 80, 73, 65, 79, 0, 0 }, { 80, 73, 69, 0, 0, 0 }, { 80, 73, 78, 0, 0, 0 },{ 80, 73, 78, 71, 0, 0 }, { 80, 79, 0, 0, 0, 0 }, { 80, 79, 85, 0, 0, 0 },{ 80, 85, 0, 0, 0, 0 }, { 81, 73, 0, 0, 0, 0 }, { 81, 73, 65, 0, 0, 0 },{ 81, 73, 65, 78, 0, 0 }, { 81, 73, 65, 78, 71, 0 }, { 81, 73, 65, 79, 0, 0 },{ 81, 73, 69, 0, 0, 0 }, { 81, 73, 78, 0, 0, 0 }, { 81, 73, 78, 71, 0, 0 },{ 81, 73, 79, 78, 71, 0 }, { 81, 73, 85, 0, 0, 0 }, { 81, 85, 0, 0, 0, 0 },{ 81, 85, 65, 78, 0, 0 }, { 81, 85, 69, 0, 0, 0 }, { 81, 85, 78, 0, 0, 0 },{ 82, 65, 78, 0, 0, 0 }, { 82, 65, 78, 71, 0, 0 }, { 82, 65, 79, 0, 0, 0 },{ 82, 69, 0, 0, 0, 0 }, { 82, 69, 78, 0, 0, 0 }, { 82, 69, 78, 71, 0, 0 },{ 82, 73, 0, 0, 0, 0 }, { 82, 79, 78, 71, 0, 0 }, { 82, 79, 85, 0, 0, 0 },{ 82, 85, 0, 0, 0, 0 }, { 82, 85, 65, 78, 0, 0 }, { 82, 85, 73, 0, 0, 0 },{ 82, 85, 78, 0, 0, 0 }, { 82, 85, 79, 0, 0, 0 }, { 83, 65, 0, 0, 0, 0 },{ 83, 65, 73, 0, 0, 0 }, { 83, 65, 78, 0, 0, 0 }, { 83, 65, 78, 71, 0, 0 },{ 83, 65, 79, 0, 0, 0 }, { 83, 69, 0, 0, 0, 0 }, { 83, 69, 78, 0, 0, 0 },{ 83, 69, 78, 71, 0, 0 }, { 83, 72, 65, 0, 0, 0 }, { 83, 72, 65, 73, 0, 0 },{ 83, 72, 65, 78, 0, 0 }, { 83, 72, 65, 78, 71, 0 }, { 83, 72, 65, 79, 0, 0 },{ 83, 72, 69, 0, 0, 0 }, { 83, 72, 69, 78, 0, 0 }, { 83, 72, 69, 78, 71, 0 },{ 83, 72, 73, 0, 0, 0 }, { 83, 72, 79, 85, 0, 0 }, { 83, 72, 85, 0, 0, 0 },{ 83, 72, 85, 65, 0, 0 }, { 83, 72, 85, 65, 73, 0 }, { 83, 72, 85, 65, 78, 0 },{ 83, 72, 85, 65, 78, 71 }, { 83, 72, 85, 73, 0, 0 }, { 83, 72, 85, 78, 0, 0 },{ 83, 72, 85, 79, 0, 0 }, { 83, 73, 0, 0, 0, 0 }, { 83, 79, 78, 71, 0, 0 },{ 83, 79, 85, 0, 0, 0 }, { 83, 85, 0, 0, 0, 0 }, { 83, 85, 65, 78, 0, 0 },{ 83, 85, 73, 0, 0, 0 }, { 83, 85, 78, 0, 0, 0 }, { 83, 85, 79, 0, 0, 0 },{ 84, 65, 0, 0, 0, 0 }, { 84, 65, 73, 0, 0, 0 }, { 84, 65, 78, 0, 0, 0 },{ 84, 65, 78, 71, 0, 0 }, { 84, 65, 79, 0, 0, 0 }, { 84, 73, 65, 78, 0, 0 },{ 84, 69, 78, 71, 0, 0 }, { 84, 73, 0, 0, 0, 0 }, { 84, 73, 65, 78, 0, 0 },{ 84, 73, 65, 79, 0, 0 }, { 84, 73, 69, 0, 0, 0 }, { 84, 73, 78, 71, 0, 0 },{ 84, 79, 78, 71, 0, 0 }, { 84, 79, 85, 0, 0, 0 }, { 84, 85, 0, 0, 0, 0 },{ 84, 85, 65, 78, 0, 0 }, { 84, 85, 73, 0, 0, 0 }, { 84, 85, 78, 0, 0, 0 },{ 84, 85, 79, 0, 0, 0 }, { 87, 65, 0, 0, 0, 0 }, { 87, 65, 73, 0, 0, 0 },{ 87, 65, 78, 0, 0, 0 }, { 87, 65, 78, 71, 0, 0 }, { 87, 69, 73, 0, 0, 0 },{ 87, 69, 78, 0, 0, 0 }, { 87, 69, 78, 71, 0, 0 }, { 87, 79, 0, 0, 0, 0 },{ 87, 85, 0, 0, 0, 0 }, { 88, 73, 0, 0, 0, 0 }, { 88, 73, 65, 0, 0, 0 },{ 88, 73, 65, 78, 0, 0 }, { 88, 73, 65, 78, 71, 0 }, { 88, 73, 65, 79, 0, 0 },{ 88, 73, 69, 0, 0, 0 }, { 88, 73, 78, 0, 0, 0 }, { 88, 73, 78, 71, 0, 0 },{ 88, 73, 79, 78, 71, 0 }, { 88, 73, 85, 0, 0, 0 }, { 88, 85, 0, 0, 0, 0 },{ 88, 85, 65, 78, 0, 0 }, { 88, 85, 69, 0, 0, 0 }, { 88, 85, 78, 0, 0, 0 },{ 89, 65, 0, 0, 0, 0 }, { 89, 65, 78, 0, 0, 0 }, { 89, 65, 78, 71, 0, 0 },{ 89, 65, 79, 0, 0, 0 }, { 89, 69, 0, 0, 0, 0 }, { 89, 73, 0, 0, 0, 0 },{ 89, 73, 78, 0, 0, 0 }, { 89, 73, 78, 71, 0, 0 }, { 89, 79, 0, 0, 0, 0 },{ 89, 79, 78, 71, 0, 0 }, { 89, 79, 85, 0, 0, 0 }, { 89, 85, 0, 0, 0, 0 },{ 89, 85, 65, 78, 0, 0 }, { 89, 85, 69, 0, 0, 0 }, { 89, 85, 78, 0, 0, 0 },{ 90, 65, 0, 0, 0, 0 }, { 90, 65, 73, 0, 0, 0 }, { 90, 65, 78, 0, 0, 0 },{ 90, 65, 78, 71, 0, 0 }, { 90, 65, 79, 0, 0, 0 }, { 90, 69, 0, 0, 0, 0 },{ 90, 69, 73, 0, 0, 0 }, { 90, 69, 78, 0, 0, 0 }, { 90, 69, 78, 71, 0, 0 },{ 90, 72, 65, 0, 0, 0 }, { 90, 72, 65, 73, 0, 0 }, { 90, 72, 65, 78, 0, 0 },{ 90, 72, 65, 78, 71, 0 }, { 90, 72, 65, 79, 0, 0 }, { 90, 72, 69, 0, 0, 0 },{ 90, 72, 69, 78, 0, 0 }, { 90, 72, 69, 78, 71, 0 }, { 90, 72, 73, 0, 0, 0 },{ 90, 72, 79, 78, 71, 0 }, { 90, 72, 79, 85, 0, 0 }, { 90, 72, 85, 0, 0, 0 },{ 90, 72, 85, 65, 0, 0 }, { 90, 72, 85, 65, 73, 0 }, { 90, 72, 85, 65, 78, 0 },{ 90, 72, 85, 65, 78, 71 }, { 90, 72, 85, 73, 0, 0 }, { 90, 72, 85, 78, 0, 0 },{ 90, 72, 85, 79, 0, 0 }, { 90, 73, 0, 0, 0, 0 }, { 90, 79, 78, 71, 0, 0 },{ 90, 79, 85, 0, 0, 0 }, { 90, 85, 0, 0, 0, 0 }, { 90, 85, 65, 78, 0, 0 },{ 90, 85, 73, 0, 0, 0 }, { 90, 85, 78, 0, 0, 0 }, { 90, 85, 79, 0, 0, 0 }, }; /** First and last Chinese character with known Pinyin according to zh collation */ private static final String FIRST_PINYIN_UNIHAN = “u963F”; private static final String LAST_PINYIN_UNIHAN = “u84D9”; /** The first Chinese character in Unicode block */ private static final char FIRST_UNIHAN = 'u3400'; private static final Collator COLLATOR = Collator.getInstance(Locale.CHINA); private static HanziToPinyin sInstance; private final boolean mHasChinaCollator; public static class Token { /** * Separator between target string for each source char */ public static final String SEPARATOR = “ ”; public static final int LATIN = 1; public static final int PINYIN = 2; public static final int UNKNOWN = 3; public Token { } public Token(int type, String source, String target) {this.type = type;this.source = source;this.target = target; } /** * Type of this token, ASCII, PINYIN or UNKNOWN. */ public int type; /** * Original string before translation. */ public String source; /** * Translated string of source. For Han, target is corresponding Pinyin. Otherwise target is * original string in source. */ public String target; } protected HanziToPinyin(boolean hasChinaCollator) { mHasChinaCollator = hasChinaCollator; } public static HanziToPinyin getInstance() { synchronized (HanziToPinyin.class) {if (sInstance != null) { return sInstance;}// Check if zh_CN collation data is availablefinal Locale locale[] = Collator.getAvailableLocales();for (int i = 0; i < locale.length; i++) { if (locale[i].equals(Locale.CHINA)) { // Do self validation just once. if (DEBUG) {Log.d(TAG, “Self validation. Result: ” + doSelfValidation()); } sInstance = new HanziToPinyin(true); return sInstance; }}Log.w(TAG, “There is no Chinese collator, HanziToPinyin is disabled”);sInstance = new HanziToPinyin(false);return sInstance; } } /** * Validate if our internal table has some wrong value. * * @return true when the table looks correct. */ private static boolean doSelfValidation() { char lastChar = UNIHANS[0]; String lastString = Character.toString(lastChar); for (char c : UNIHANS) {if (lastChar == c) { continue;}final String curString = Character.toString(c);int cmp = COLLATOR.compare(lastString, curString);if (cmp >= 0) { Log.e(TAG, “Internal error in Unihan table. ” + “The last string ”“ + lastString+ ”“ is greater than current string ”“ + curString + ”“.”); return false;}lastString = curString; } return true; } private Token getToken(char character) { Token token = new Token(); final String letter = Character.toString(character); token.source = letter; int ffset = -1; int cmp; if (character < 256) {token.type = Token.LATIN;token.target = letter;return token; } else if (character < FIRST_UNIHAN) {token.type = Token.UNKNOWN;token.target = letter;return token; } else {cmp = COLLATOR.compare(letter, FIRST_PINYIN_UNIHAN);if (cmp < 0) { token.type = Token.UNKNOWN; token.target = letter; return token;} else if (cmp == 0) { token.type = Token.PINYIN; ffset = 0;} else { cmp = COLLATOR.compare(letter, LAST_PINYIN_UNIHAN); if (cmp > 0) { token.type = Token.UNKNOWN; token.target = letter; return token; } else if (cmp == 0) { token.type = Token.PINYIN; ffset = UNIHANS.length - 1; }} } token.type = Token.PINYIN; if (offset < 0) {int begin = 0;int end = UNIHANS.length - 1;while (begin <= end) { ffset = (begin + end) / 2; final String unihan = Character.toString(UNIHANS[offset]); cmp = COLLATOR.compare(letter, unihan); if (cmp == 0) { break; } else if (cmp > 0) { begin = offset + 1; } else { end = offset - 1; }} } if (cmp < 0) {offset--; } StringBuilder pinyin = new StringBuilder(); for (int j = 0; j < PINYINS[offset].length && PINYINS[offset][j] != 0; j++) {pinyin.append((char) PINYINS[offset][j]); } token.target = pinyin.toString(); return token; } /** * Convert the input to a array of tokens. The sequence of ASCII or Unknown characters without * space will be put into a Token, One Hanzi character which has pinyin will be treated as a * Token. If these is no China collator, the empty token array is returned. */ public ArrayList
篇2：再转空楼诗歌
再转空楼诗歌
云鹤远去数十余，遗线纸鸢各东西。又是一度春花雨，悠悠楼台芳草依。
一夜清雨，微曦浸脾。信步青石板，觅一世清明淡韵，抬首云鹤楼，看人海
滚滚红尘。青青芳菲，白墙黛瓦，红柱绿廊，林荫水榭，篇篇风景如故，画中却
没了你袅娜朦胧、凝香纤指……
想那玲珑岁月，琥珀年华。举一杯青茗问苍茫大地，抚一首新曲叹人生合离。
花开蝶舞，绿波青漪，低吟浅唱，绕梁不息，淡墨素韵，梨花杏雨，恬淡出多少
青青岁月，琉璃光影……
而今，红粉东流，夕阳西隐。谁又说得清当年是你离开了我，还是我离你而
去。氤氲的天空，带走了多少墨香笺秀、竹韵丝音……
唯有，浅冷的风衣，深褐的长靴，款款来到睡梦里。咏春、咏秋、吟夏、吟
冬。似高山轻抚如醉，似流水润泽如酥。
峥嵘三月，云鹤不复，啼声依旧，葳蕤丛生，独上空楼。转山、转水、转楼
台。思云、思雨、思丝竹。一卷瘦词长空舞，恍惊人世几度秋。早知付水东流去，
何苦遗香云鹤楼。
光阴几度，似水流年。趟过红尘漫漫，才见小溪幽幽。几许迷茫、几许萌动、
几许清醒、几许忧愁，皆化作滚滚春水向东流。
河灯画舫、绸庄酒肆，如烟。杏花煮酒、青梅依依，如梦。再转空楼，几世
春秋……
篇3：Excel表格数字转汉字大写的方法
你知道吗?利用Excel中的单元格格式，就可以将数字转汉字大写，像“”这样的数字转换为“贰零壹贰年零贰月零伍日”。
转换方法：
①选中需要转换的单元格，单击“菜单栏”的“格式”，在下来菜单中选择“单元格”命令;
②在弹出的“单元格格式”对话框中“数字”下面的的“分类”里面选择“自定义”; ③在右边的“类型”中输入：[dbnum2]0000月00日; 此时，0205就变成了贰零壹贰年零贰月零伍日，篇4：时光再转逝去韶华我用笔铭刻散文
时光再转逝去韶华我用笔铭刻散文
墙面的挂表会停止跳动吗；树与叶约定的离别能延迟吗；清波碧草可以多片刻停留吗？
时光流转，河堤新绿转瞬枯黄，夏雨过后冬雪一场，又是一年。从黄发垂髫的稚气小孩，浑然不觉之间，我已经迈过弱冠之年。
是秋，萧瑟之风唤醒身体本能的颤抖，凉意透过鼻梁，传入喉咙，最后停靠在心口。一股自内而外的感动席卷了我的全身，我是在感动生命吗？我想应该不是吧，我没那么伟大，更没那么无聊。可是这种悸动，有点感伤，有点温暖，不知道为什么，会在此刻出现。或许只是因为我是一个容易感触的人吧。从教室出门到现在，我看到了很多我喜欢的景与物。风在南门喷池拨动的圈圈涟漪，好似一盘讲述故事的棋，风落纹起，转而热闹而杂乱，风停之时，重归平静，或许，这也有些像人生吧。山水草木，虫鱼鸟兽，一直未变的`喜好。再看风动云移，风怀柳细，漫漫落叶此刻归息，心境莫名的平和。那种悸动，我真的没办法形容，我只能呢喃一语，我喜欢的，我在感受。
因为下课时间比较晚了，食堂已经没了热闹，和同学安静的吃完饭，我看着电视发呆。里面正在播放一个叫作开门大吉的节目，隔太远，我听不到任何声音，但是因为暑假看过这个节目，我知道，那些参加节目的人都是为了梦想基金而来，而他们都有自己的故事，让我为之喝彩的故事，我想，这些人，应该都是有梦想的人吧。也在这一刻，我心底突然有些被揪起的感觉，梦想，梦想，脑海不断盘旋这个词，就像一只高傲的苍鹰在我的天空，我问自己，我有梦想吗？我呆了，我知道，我的疑问让我慌了。
我想变强，对，想变强。在这学期第一次上英语课的时候，我看见了班上的一个女孩，一种特别熟悉的感觉，我觉得我很想认识她。那天的课，貌似我也没听吧，一直在想我应该去要联系方式吗？我有些不敢，或许因为自卑，或许因为腼腆，也或许因为很多或许吧。我不是一个胆大的人，可是最后我还是去了，那时候我的身体都有一些颤抖，我觉得很丢人，因为我还是那么胆怯，然而我也开心，因为我做到了。她是一个很漂亮的女孩，我偷偷看过她笑，很甜，我想，以前看到漂亮女孩都会脸红转头装作没看见的那个我开始转变了吧。谢谢你，真的很高兴可以认识你。再后来的第一讲专业英语课，老师提了一个问题，没有同学愿意回答，因为要用英文说话吧。我想，我应该做点什么改变自己吧，于是我站在了老师面前，可是我硬是没有说一句完整的话，我被自己惊呆了，可能老师更惊讶吧，她一定在想，这孩子英语该有多差呀。最后我坐下了，心也很平静，没有尴尬，没有失落，我想我以后得练习英语了，下次一定要做好。再后来的公共课，一百多号同学面前，我在原地发言，说了些小伙伴说不应该在这种场合谈论的话题，关于政治，其实我也不懂，就是想锻炼自己罢了。我在努力改变自己，更在努力丰富自己的生活。可是，变强，每个人都想，这，算是梦想吗？我想应该可以不算吧，这只是我们为了丰富人生必经的一条路，只是我以前走得太少，有太多弱点，现在才开始努力去改变。
后来，我也反复问了自己好多次，为什么要去做那些事，所谓的变强一定要这样吗，这样的改变一定好吗？其实我自己也不知道，我只是觉得，因为想了，所以做了！
国庆快到了，我想出去旅行，换一个心情，换一个面貌，换一个新的环境，体味这秋风的韵味。想了很多，后来自己弱弱地骂了自己一句，脑残，什么都去想，还不如去躺穿上做梦呢，那样子想去哪都行。梦不是遥不可及，但需要的是行动，而不是空想，我喜欢自己给自己的那个解释，因为想了，所以做了。我希望下一次，自己可以对自己说，因为做了，所以快乐！
吃过饭，回到宿舍，理了理思绪，我想，那篇我很久之前就想写的文字，应该可以落笔了吧！
篇5：在Linux Shell下将汉字转换为Url编码
在linux 的shell环境下有一个od命令可以将文件按不同的进制的ascii码输 出，该功能可以完成在linux shell下将汉字转换为url编码的任务，
url编码是十六进制的形如%E6%9C%8D%E5%8A%A1%E5的字符串，test是包含 “数据库网络,”这几个字符的文件，以下命令输出：
#od -t x /test
0000000 ddbefdca f8cde2bf 0a2ce7c2
0000014
该字符串对应的url编码为 %CA%FD%BE%DD%BF%E2%CD%F8%C2%E7%2C，
可以看出编码的对应关系以下是转换的脚本：
CODE:#!/bin/sh
#make url code
od -t x /test |awk '{
w=split($0,linedata,“ ”);
for (j=2;j
{
for (i=7;i>0;i=i-2)
{
if (substr(linedata[j],i,2) != “00”) {printf “%” ;printf toupper(substr(linedata[j],i,2));}
}
}
}' >/testurl
testurl文件的内容就是转换结果。
篇6：解决中文Pro/E工程图转AutoCAD后汉字乱码问题
ACAD中写中文转到中文版PROE的DRAWING中没任何问题，但在中文版的PROE中Pro/Drawing出好的工程图，例如标题栏、标注说明等用到中文，不知你发现没有，当你把它转成DWG后用AutoCAD打开后，你无论在ACAD中如何设中文字体，把它炸开(因文字由PROE转DWG时全成图块了)，都无法正常显示PROE中的中文字体。但有时又需要出一AutoCAD的DWG格式文件，怎么办呢?全部删掉重标?这样重复工作又浪费时间，其实可以通过下面办法实现：
转时先不要直接转成DWG格式，先转成DXF格式(这样在ACAD中文字就不会成为一个图块)，再用AutoCAD打开这个DXF文件，这时此ACAD文件字体风格是纯英文字符，用Style指令来改变字体风格，采用BIG FONT，选一种较为合适的中文字体，然后应用，你会发现，PROE中标的中文字全回复过来了，
经试验，SYFS.SHX字体与。PROE的字体相差无几，这是一位网友优化过的ACAD中文字体，建议用这种字体，此字体可在本站MDT专区下载。
篇7：如何让成交客户扩大再销售或实现转介绍？
对于已经成交的客户，出色的营销员一定会想方设法扩大再销售，做得更进一步的，甚至还会让客户实现转介绍，这就是一门销售的艺术了，其实，扩大再销售或者实现转介绍，是一种借力使力，它甚至可以产生倍增效应，让销售步入一种良性循环状态，甚至出现业绩“井喷”效果，因此，让成交客户扩大再销售或实现转介绍，便成为很多营销人员追求的境界，但如何才能有效做到呢？
推销整体产品。产品分为核心产品（核心功能、利益等）、有形产品（包装、外观等）附加产品（比如服务等），因此，要想扩大在销售，或者实现客户转介绍，推销符合客户需要的产品是至关重要的，这是前提和基础工作。如果产品不过硬，扩大再销售或者转介绍就没有根基。推销产品，不仅包括核心及有形产品，无形的附加产品更加重要，比如品牌和服务，它是增加产品价值，让客户达到最大化满意的核心组成部分。
提供超值服务。在提供了符合客户需求、让客户满意的产品之后，要想扩大再销售，让老客户能够做我们的义务宣传员、推销员，实现转介绍，营销人员还要做好超值服务工作。这也许是份外的事情，但却也是客户最感觉有价值、受尊重甚至物超所值之所在。比如，营销人员要做最大化的超值服务，就不仅要做好售前、售中、售后服务，还要提供顾问式服务，这里包含两层含义，一是营销人员要用心服务，而不是用嘴服务。也就是答应给客户的服务项目一定要兑现；二是营销人员会做顾问式销售，不仅把产品卖给客户，还能做客户高参，比如，协助客户完善其企业的规章制度，操作手册、提供员工培训，给客户提供一些有参考价值的信息、针对客户企业现状，提供合理化的经营或者管理建议等，如果是零售客户，向其推介符合其实际需要而又不让其“难为情”的产品等等，
先交朋友，再做生意。很多营销人员在做销售时，最容易犯的一个毛病，就是过于商业化，言必称产品或者销售，让人感觉心里很不爽。要想做好扩大再销售或实现转介绍，营销人员要从两个方面着手：一是真心关心别人，对待别人。牛根生曾经谈到他的经营之道，说其之所以取得成功，是因为其会三换思考，即换心、换位、换岗，正是因为以心比心，所以，才对对方多了一份理解，多了一份默契，多了一份包容。所以，营销人员在跟老客户打交道过程中，一定要跳出生意圈，先交朋友，再做生意，最后才能形成“客户+朋友”的关系，这样的关系才是长久的。二是用心感动客户。所谓营销，就是为客户提供一揽子问题解决方案的过程，没有问题，还要我们营销人员做什么？因此，营销人员要能够权衡企业与客户利益，能够给客户解决疑难问题，比如利润低、滞销、积压等，通过实际行动感动客户，谁为客户着想，客户就一定会为谁着想。
关于作者：
崔自三：崔自三，著名营销实战培训专家、经销商战略发展研究专家――清华大学、浙江大学总裁班、总监班特约讲师，“营销OJT”现场实战训练模式创造者，曾在《销售与市场》、《销售与管理》、《商界》等各类媒体发表营销与管理文章200多万字，出版《八闪十二翻――超速营销突破法》、营销实战小说《挑战》，经销商专著《做一名会赚钱的赢销商》，历任多家大型企业集团企划总监、营销总监等职。查看崔自三详细介绍 浏览崔自三所有文章 进入崔自三的博客
篇8：北京自考办：自考生应领完成绩单后再转考籍
近日不少考生咨询转考问题，北京市自考办老师提醒，刚参加完自考的考生一定要在领取成绩后再办理转出手续。
据了解，自考转出考籍不是一门或几门课程转出，而是整个考籍转出，考生一旦办理转出手续后，所有合格课程成绩都将随之转出。刚参加完4月自考的考生，如果现在办理转出手续，4月考过的成绩会因未领取而无法转出。
据悉，4月自考成绩6月15日至17日在区县自考办发放，因此，这部分考生至少要到6月中旬后才能办理转出手续。不过要提醒考生的是，为规范考籍管理，按规定，考生考籍转出后不能再次转入北京。
北京市自考办有关老师表示，在北京和外地同时交叉考试是不允许的。已在北京注册自考的考生，如考试期间同时在外省参加部分课程的考试，其成绩不能转入北京；如先在外省参加自考，后因工作等原因到北京参加自考，则允许将先前在外省取得的合格成绩转入北京。但有条件限制，专科在北京要取得不少于5门课程的合格成绩，本科要在京取得不少于4门课程的合格成绩，最后才能在京办理毕业手续；在北京参加专科段学习，在外省参加本科段学习的考生，在京办理专科毕业手续后，可以将外省取得的本科合格成绩转入北京继续本科学习。
欲办理考籍转出手续的考生须持北京市自学考试准考证和成绩通知单，在考生接待日期间到北京市自考办办理转出手续。篇9：将阿拉伯数字转换为汉字数字,支持到百万亿数据库教程
'例子:
'Debug.Print UpNumber(-10556765765555.45,0,True )
'显示为:
'负壹拾万伍仟伍佰陆拾柒亿陆仟伍佰柒拾陆万伍仟伍佰伍拾伍圆肆角零分
Public Function UpNumber(ByVal Number As Double, Optional ByVal Typ As Long, Optional ByVal IsMoney As Boolean) As String
'********************************************************************************
'--------------------------------------------------------------------------------
'将阿拉伯数字转换为大写字符串
'Version 1.0 -02-06
'Version 1.1 2002-04-05 修改到支持到千亿
'Version 1.2 -08-14 修改为支持 Typ,IsMoney 参数,转换结果可以不是金额,支持到百万亿
'Roadbeg
'--------------------------------------------------------------------------------
'
'--------------------------------------------------------------------------------
'参数说明:
'Number 待转换的数字,可以是小数.
'Typ 转换类型,可选值 0,1
'0 转换为 零,壹,贰 等
'1 转换为 一,二,三 等
'IsMoney 是否是金额,如果是,则转换为多少元,小数后转换为多少角,分,反之则转换为类似于“二点三”这种形式
'--------------------------------------------------------------------------------
'
'--------------------------------------------------------------------------------
'返回值说明:
'如果成功,返回转换后的字符串
'如果失败,返回空字符串
'--------------------------------------------------------------------------------
'
'--------------------------------------------------------------------------------
'注意,此函数最大只支持到百万亿
'没有对 Typ 的值进行检查,如果 Typ 不为 0,1 之一,将会引发错误.
'另,由于 Double 类型数值范围的原因,超过百万亿,将不能显示小数,同样的超过十万亿只能显示一个小数,以此类推.
'--------------------------------------------------------------------------------
'********************************************************************************
On Error GoTo Doerr
Dim Result As String '返回值
Dim strNumber As String '文本型的 Number
Dim lngNumberLen As Long '文本型的 Number 的 Len
Dim strTmp As String
Dim strFirst As String, strEnd As String
Dim lngI As Long, lngJ As Long, lngTmp As Long
Dim strNum(10) As String '大写数字
Dim strUnit(16) As String '单位,比如 十,拾,万等
Dim strUnitB(2) As String '小数后的单位
'初始化
Select Case Typ
Case 0
strNum(0) = “零”: strNum(1) = “壹”: strNum(2) = “贰”: strNum(3) = “叁”: strNum(4) = “肆”
strNum(5) = “伍”: strNum(6) = “陆”: strNum(7) = “柒”: strNum(8) = “捌”: strNum(9) = “玖”
If IsMoney Then
strUnit(0) = “圆”
strUnitB(0) = “角”: strUnitB(1) = “分”
Else
strUnit(0) = “点”
End If
strUnit(1) = “拾”: strUnit(2) = “佰”: strUnit(3) = “仟”: strUnit(4) = “万”
strUnit(5) = “拾”: strUnit(6) = “佰”: strUnit(7) = “仟”: strUnit(8) = “亿”: strUnit(9) = “拾”
strUnit(10) = “佰”: strUnit(11) = “仟”: strUnit(12) = “万”: strUnit(13) = “拾”: strUnit(14) = “佰”
strUnit(15) = “仟”
Case 1
strNum(0) = “零”: strNum(1) = “一”: strNum(2) = “二”: strNum(3) = “三”: strNum(4) = “四”
strNum(5) = “五”: strNum(6) = “六”: strNum(7) = “七”: strNum(8) = “八”: strNum(9) = “九”
If IsMoney Then
strUnit(0) = “元”
strUnitB(0) = “角”: strUnitB(1) = “分”
Else
strUnit(0) = “点”
End If
strUnit(1) = “十”: strUnit(2) = “百”: strUnit(3) = “千”: strUnit(4) = “万”
strUnit(5) = “十”: strUnit(6) = “百”: strUnit(7) = “千”: strUnit(8) = “亿”: strUnit(9) = “十”
strUnit(10) = “百”: strUnit(11) = “千”: strUnit(12) = “万”: strUnit(13) = “十”: strUnit(14) = “百”
strUnit(15) = “千”
Case Else
'参数错误
GoTo Errexit
End Select
Result = “”
If Number = 0 Then
If IsMoney Then
Result = strNum(0) & strUnit(0) & “整”
Else
Result = strNum(0)
End If
Else
If IsMoney Then
strNumber = Trim(str(FormatCurrency(Number, 2, vbTrue, vbFalse, vbFalse))) '保留两位小数
Else
strNumber = Trim(str(Number)) '简单的转换为字符串型
End If
lngNumberLen = Len(strNumber)
If Left(strNumber, 1) = “-” Then '处理负数
strFirst = “负”
strNumber = Right(strNumber, lngNumberLen - 1)
lngNumberLen = lngNumberLen - 1
Else
strFirst = “” '通常不需要 =“”
End If
lngI = InStrRev(strNumber, “.”)
If lngI Then
strTmp = Right(strNumber, lngNumberLen - lngI)
If IsMoney Then
strTmp = strTmp & “00”
strEnd = “” '通常不需要 =“”
For lngJ = 1 To 2
Result = Result & strNum(CLng(Mid$(strTmp, lngJ, 1))) & strUnitB(lngJ - 1)
Next
Else
strTmp = Right(strNumber, lngNumberLen - lngI)
For lngJ = 1 To lngNumberLen - lngI
Result = Result & strNum(CLng(Mid$(strTmp, lngJ, 1)))
Next
End If
strNumber = Left(strNumber, lngI - 1) '去除小数部分
lngNumberLen = Len(strNumber) '新的字符串长度
Else
If IsMoney Then
strEnd = “整”
Else
strEnd = “”
End If
End If
'以下为主循环部分
lngI = 0
For lngJ = lngNumberLen To 1 Step -1
lngTmp = CLng(Mid$(strNumber, lngJ, 1))
If lngTmp Then
Result = strNum(lngTmp) & strUnit(lngI) & Result
Else
If lngI = 0 Or lngI = 4 Or lngI = 8 Or lngI = 12 Then '超过 16 位不支持
Result = strNum(lngTmp) & strUnit(lngI) & Result
Else
Result = strNum(lngTmp) & Result
End If
End If
lngI = lngI + 1
Next
Result = Replace(Result, strNum(0) & strNum(0), strNum(0)) '零零“, ”零
Result = Replace(Result, strNum(0) & strNum(0), strNum(0)) '零零“, ”零
'亿零万零圆“, ”亿圆“
Result = Replace(Result, strUnit(8) & strNum(0) & strUnit(4) & strNum(0) & strUnit(0), strUnit(8) & strUnit(0))
Result = Replace(Result, strUnit(8) & strNum(0) & strUnit(4), strUnit(8) & strNum(0)) '亿零万, ”亿零“
Result = Replace(Result, strUnit(4) & strNum(0) & strUnit(0), strUnit(4) & strUnit(0)) '亿零万”, “亿零
Result = Replace(Result, strNum(0) & strUnit(8), strUnit(8)) '零亿
Result = Replace(Result, strNum(0) & strUnit(4), strUnit(4)) '零万
Result = Replace(Result, strNum(0) & strUnit(0), strUnit(0)) '零圆
Result = Replace(Result, strNum(0) & strNum(0), strNum(0)) '零零”, “零
Result = Replace(Result, strNum(0) & strNum(0), strNum(0)) '零零”, “零
If IsMoney Then
Result = strFirst & Result & strEnd
Else
If Right(Result, 1) = strUnit(0) Then Result = Left(Result, Len(Result) - 1) '去除最后一个 ”点“
End If
End If
Complete:
GoTo Quit
Doerr:
Errexit:
Result = ”"
Quit:
UpNumber = Result
End Function
篇10：白航为我两本诗集写的读后感再转
白航为我两本诗集写的读后感（再转）
白航为我两本诗集写的读后感 白航老师两次应我的邀请，给我的诗集写的读后感，我认为比较中肯，尤其在诗歌创作的观念上，我认为对写诗的朋友会有一定的指导。现转给大家。 读钟明全先生诗作的几句感言（《爱的诗篇》） 白航 我有些羡慕他的丰富想象与奇妙的构思。 我想向他说，他的诗是真的！ 给妻子的106首诗，令人眼花缭乱但也极为普通；一个爱字很深奥却也五味俱全…… 爱母亲、妻子及恋人，必也爱家庭，爱社会上生活着的各类异姓兄弟和姐妹及贫苦的劳动人民。这些人在他笔下鲜活地生活着。 诗歌，由我心流向你心；由你心流向我心。它就像欢快的小溪那样浪花四溅，如一股新鲜的活水冲洗我们的'心胸。这该是最早的诗人之最原始的心愿吧！我读他的诗作也似乎感受到了这一点。 诗要活，然后才有美丽的花朵缀满枝头。 诗无空法。传扬个性是极为重要的！ 2009．1.25于成都 读钟明全诗作的几句赘言（《冲撞盆地的后生》） 白航 钟明全写诗的诗歌见解是：“有实感才写”。这一点我赞成，因为我也曾说过类似的话。 诗人应该关心社会，关心社会上各类人物的生活空间和他们不幸的遭遇。这点，他做到了。 在神秘的诗歌领地辛苦耕耘了三十多年的钟明全，终于收获了可喜的成果，将要出版两本诗集，实现了他“创作快乐”的美好愿望。我祝他今后更“快乐”。 “实感写诗”需要经过一次艺术升华，使实感转化为形象或诗之意境，避免赤裸裸地直白和标语口号。 他八十年代配合时事写的一些诗作，阳光而积极向上，作为练笔是有益的。它也反映了当时自己写诗的一段诗路历程。 学一学王维的山水诗，便会理解他的诗作主旨，很少在诗中明白说出来，多是通过“境”或“象”，交由读者去思考，所以长读不厌。 我比较喜欢钟明全以爱感人的《疯子的话》和以情动人的《小学教师》（标题为《不该回忆的过去》）这类作品。感情真挚、爱恨交织、手法细腻，给人以回味的余地。 祝他忆旧思新！ 2009年2月16日 写于成都
