當前位置:編程學習大全網 - 源碼下載 - 修改txt表單源代碼

修改txt表單源代碼

StrConv函數

語法是: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教材好好看看。

忘了哪個老外大牛說程序是“算法+字符串處理”

字符串的處理是每種語言中最基本的。不要粗心大意。

  • 上一篇:濰坊市紅色文化資源保護條例
  • 下一篇:小編告訴妳:什麽是RFID技術
  • copyright 2024編程學習大全網