當前位置:成語大全網 - 漢語詞典 - 如何用vb實現簡單翻譯

如何用vb實現簡單翻譯

公共?功能?ConvertString(ByVal?strText?作為?字符串)

暗淡?斯特拉?作為?不同的

斯特拉?=?"?-A-B-C-D-E-F-G-H-I-J-K-L-M-N-O-P-Q-R-S-T-U-V-W-X-Y-Z-a-b-C-D-E-F-G-H-I-j-k-L-M-N-O-P-Q-r-s-T-U-V-W-X-Y-Z "

斯特拉?=?Split(strA,"-")

為了什麽?我?=?0?去哪?欠平衡

strText?=?替換(strText,strA(i),?格式(我,?"00")?& amp?"?")

下壹個?我

ConvertString?=?修剪(strText)

結束?函數將上述函數添加到模塊中,然後使用代碼。

文本2。Text = ConvertString(Text1。正文)

您可以將Text1中的內容轉換為數字,並在Text2中顯示。

註意我寫的這個函數只轉換英文字母和空格(可以看到strA= " "),如果不是英文字母,空格會直接保留。