限制特殊字符问题？？
Function   ReplaceBadWord(g_word)
    g_word=Replace(g_word, "   ", " ")
    g_word=Replace(g_word, ", ", " ")
    g_word=Replace(g_word, " < ", " ")
    g_word=Replace(g_word, ". ", " ")
    g_word=Replace(g_word, "> ", " ")
    g_word=Replace(g_word, "/ ", " ")
    g_word=Replace(g_word, "? ", " ")
    g_word=Replace(g_word, "; ", " ")
    g_word=Replace(g_word, ": ", " ")
    g_word=Replace(g_word, " ' ", " ")
    'g_word=Replace(g_word, "   "   ", " ")
    g_word=Replace(g_word, "[ ", " ")
    g_word=Replace(g_word, "] ", " ")
    g_word=Replace(g_word, "{ ", " ")
    g_word=Replace(g_word, "} ", " ")
    g_word=Replace(g_word, "\ ", " ")
    g_word=Replace(g_word, "| ", " ")
    g_word=Replace(g_word, "= ", " ")
    g_word=Replace(g_word, "+ ", " ")
    g_word=Replace(g_word, "- ", " ")
    g_word=Replace(g_word, "_ ", " ")
    g_word=Replace(g_word, ") ", " ")
    g_word=Replace(g_word, "( ", " ")
    g_word=Replace(g_word, "* ", " ")
    g_word=Replace(g_word, "^ ", " ")
    g_word=Replace(g_word, "% ", " ")
    g_word=Replace(g_word, "$ ", " ")
    g_word=Replace(g_word, "@ ", " ")
    g_word=Replace(g_word, "! ", " ")
    g_word=Replace(g_word, "` ", " ")
    g_word=Replace(g_word, "~ ", " ")    
   

    g_word=Replace(g_word, "， ", " ")
    g_word=Replace(g_word, "《 ", " ")
    g_word=Replace(g_word, "。 ", " ")
    g_word=Replace(g_word, "》 ", " ")
    g_word=Replace(g_word, "、 ", " ")
    g_word=Replace(g_word, "？ ", " ")
    g_word=Replace(g_word, "； ", " ")
    g_word=Replace(g_word, "： ", " ")
    g_word=Replace(g_word, "‘ ", " ")
    g_word=Replace(g_word, "“ ", " ")
    g_word=Replace(g_word, "〔 ", " ")
    g_word=Replace(g_word, "〕 ", " ")
    g_word=Replace(g_word, "｛ ", " ")
    g_word=Replace(g_word, "｝ ", " ")
    g_word=Replace(g_word, "、 ", " ")
    g_word=Replace(g_word, "| ", " ")
    g_word=Replace(g_word, "＝ ", " ")
    g_word=Replace(g_word, "＋ ", " ")
    g_word=Replace(g_word, "－ ", " ")