語法是:StrConv(要轉換的字符串,轉換格式)
轉換格式:
VbUnicode將Ansi字符串轉換為Unicode。
VbFromUnicode將Unicode字符串轉換為Ansi。
====================
補充回答:
看看下面的基本例子,妳應該對VB的字符串處理方法有所了解。
私有子命令1_Click()
將sUnicode作為字符串變暗
昏暗的三四如弦
Unicode操作
SUnicode = "王小明中山路100號A123456789,651023,(02)2345678 "。
調試。Print Len(sUnicode)返回44。
Debug.printmid $ (unicode,5,10)'返回A123456789。
調試。Print Instr(sUnicode,“Shanghai”)'返回23。
將Unicode字符串轉換為Ansi
sAnsi = StrConv(sUnicode,vbFromUnicode)
Ansi操作
調試。Print LenB(sAnsi)'返回54。
Debug.printmidb $ (sansi,8,10)' return?因為我忘了切換回Unicode。
調試。printstrconv (midb $ (sansi,8,10),vbunicode)'返回A123456789,請註意轉折。
必須完成返回Unicode的操作。
Debug.printinstrb (Sansi,strconv ("Shanghai ",vbfromnicode))' Return 23,別忘了。
需要將“上海”轉換成Ansi,否則找不到。
末端接頭
================
讀入文本文件
在VB小技巧中,有壹個是快速讀取文件的方法:
私有子命令1_Click()
Dim文件作為字符串
打開“C:filename.txt”作為#1輸入
sFile = Input$(LOF(1),#1)
關閉#1
末端接頭
不幸的是,如果妳閱讀的文件包含中文字符,上述程序將出現輸入粘貼結束。
文件錯誤。因為LOF返回文件的字節數,而輸入函數讀取字符數,因為
該文件包含中文,因此文件中的字符數將少於字節數,因此會出現錯誤。
為了解決這個問題,我們需要使用兩個函數,StrConv和InputB:
私有子命令1_Click()
Dim文件作為字符串
打開“C:filename.txt”作為#1輸入
sFile = StrConv(InputB $(LOF(1),#1),vbUnicode)
關閉#1
末端接頭
上面的修正程序首先用InputB讀入文件,但是用InputB讀入的文件是Ansi格式的。
所以妳得用StrConv把它轉換成Unicode。
================
我對VB不熟悉。這些都是別人抄襲的。這些例子應該足以幫助妳。如果這還不夠,妳其實應該找壹本VB教材好好看看。
忘了哪個老外大牛說程序是“算法+字符串處理”
字符串的處理是每種語言中最基本的。不要粗心大意。