private sub button3_click(byval sender as system.object, byval e as system.eventargs) handles button3.click
dim ss as string
ss = me.textbox3.text.trim
dim str as string
for each s as char in ss
str = str & getzjm(s)
next
me.textbox4.text = str
end sub
private function getzjm(byval str as string) as string
if (str.compareto("吖") < 0) then return str
if (str.compareto("八") < 0) then return "a"
if (str.compareto("嚓") < 0) then return "b"
if (str.compareto("咑") < 0) then return "c"
if (str.compareto("妸") < 0) then return "d"
if (str.compareto("發") < 0) then return "e"
if (str.compareto("旮") < 0) then return "f"
if (str.compareto("鉿") < 0) then return "g"
if (str.compareto("譏") < 0) then return "h"
if (str.compareto("咔") < 0) then return "j"
if (str.compareto("垃") < 0) then return "k"
if (str.compareto("嘸") < 0) then return "l"
if (str.compareto("拏") < 0) then return "m"
if (str.compareto("噢") < 0) then return "n"
if (str.compareto("妑") < 0) then return "o"
if (str.compareto("七") < 0) then return "p"
if (str.compareto("亽") < 0) then return "q"
if (str.compareto("仨") < 0) then return "r"
if (str.compareto("他") < 0) then return "s"
if (str.compareto("哇") < 0) then return "t"
if (str.compareto("夕") < 0) then return "w"
if (str.compareto("丫") < 0) then return "x"
if (str.compareto("帀") < 0) then return "y"
if (str.compareto("咗") < 0) then return "z"
return str
end function
物件導向之自動生成助記碼
物件導向之自動生成助記碼 這是個母體語言導致的問題。隨著計算機應用技術的日益成熟,那種單純依靠編碼實現資料操作的方式早已過時,通過基於母語的方式實現各種操作就是必然要達到的設計目標。4.2.4.1 命題提出 我們基於漢語環境,所以漢語就是交流效果最好的資料表現方式。現實的問題是 最好的表現與最簡單的...
在Oracle中獲取拼音助記碼
利用 oracle的現成的排序方法,編寫獲取拼音首字母的函式就十分容易了,只需要找到每個首字母對應開頭漢字和結尾漢字,根據這些邊界漢字進行比較,就可以找到當前漢字的首字母資訊。用類似的方法,獲取乙個漢字的整個拼音也是可行的,只不過確定字頭字尾的工作會更加的繁瑣。需要說明的是,這種方法很難處理多音字,...
python提取中文字元 Python提取中文字元
寫這個jupyter的原因是好幾次自己爬完新聞之後,發現中間有些是html標籤 或者其他多餘的英文本元,自己也不想保留,那麼這時候乙個暴力簡單的方法就是使用 unicode 範圍 u4e00 u9fff 來判別漢字 unicode 分配給漢字 中日韓越統一表意文字 的範圍為 4e00 9fff 目前...