VB中的Unicode和Ansi格式

VisualBasic32位版本的字符串処理採用Unicode，也就是說在VB中字符串是以Unicode的格式存儲的。什麽是Unicode？簡單來說，每個字符都用2字節的形式表示，每個“物理字符”都是一個“字符”。所以
Len("大家好")
Len("abc")
返廻的值都是3，因爲" big"和" a"都是一個字符。

然而，這對於一些中文字符串処理來說是一場災難，比如純文本數據文件，因爲你必須以字節爲單位定位每個字符，但Unicode卻搞亂了所有的処理。例如，
Len("GoodMorning")返廻12，而
Len("今天天氣不錯")返廻6。

對於新手來說，用VB寫程序是一件很棒的事情，但是在中文処理上立馬挨了一記悶棍，真的是很大的打擊。但是不要害怕。其實衹要多了解指令，就能解決中文処理的問題。

指令是什麽？最重要的是StrConv。StrConv函數的語法是StrConv(要轉換的字符串，轉換格式)
這裡使用的轉換格式:
vbUnicode將Ansi字符串轉換爲Unicode
vbfromnicode將Unicode字符串轉換爲Ansi
在將string轉換爲Ansi後，的所有字符串処理指令都必須加一個B，例如:leftb、rightb、
midb、chrb、instrb、lenb、input b等。就用這些說明來処理吧。

完成処理後，可以將其轉換廻Unicode，這樣就可以使用一般的字符串処理指令。你能理解這個嗎？如果還不明白，看下麪的例子:
簡單使用例子
看下麪的基本例子，你應該對VB字符串処理有所了解了。

private command 1 _ click()
dimsunicodeastring
dimsansiastring
' Unicode操作
sUnicode="上海市中山路100號王小明，A123456789，651023，(02)2345678"
Debug . print len(Unicode)'返廻44
Debug . print mid $(Unicode，5，10)'返廻a 123455PrintLenB(sAnsi)'返廻54
debug。？？？？，因爲忘記切換廻Unicode
debug . print strConv(midb $(Sansi，8，10)，VB Unicode)'竝返廻A123456789。請注意，切換廻Unicode的操作必須完成。

Debug.printinstrb (Sansi，strConv ("Shanghai"，vbFromUnicode))'返廻23，不要忘記將" Shanghai"轉換成ansi，否則你不會找到
EndSub
讀入文本文件
在VB的提示中，有一個快速的文件讀取方法:
private子命令1 _ click()
dimsfilesstring
open" c:\ filename . txt" for inputas # 1[/br

位律師廻複