VB寫程序XP化後中文處理問題,VB寫程式XP化後中文處理問題

2023-02-18 22:15:46 字數 2493 閱讀 9037

1樓:瘋狂的老賈

不要用vb程式去做xp介面化處理,這個東西有嚴重的相容性問題。

在正式開發中是不用的。如果你確實想的話,把所有的string型別都轉化成unicode的格式,用convert函式。

語法:strconv 函式

返回按指定型別轉換的 variant (string)。

語法strconv(string, conversion, lcid)

strconv 函式的語法有下面的命名引數:

部分 說明

string 必要引數。要轉換的字串表示式。

conversion 必要引數。integer。其值的和決定轉換的型別。

lcid 可選的。如果與系統localeid不同,則為localeid(系統localeid為預設值。)

設定值conversion 引數的設定值為:

常數 值 說明

vbuppercase 1 將字串文字轉成大寫。

vblowercase 2 將字串文字轉成小寫。

vbpropercase 3 將字串中每個字的開頭字母轉成大寫。

vbwide* 4* 將字串中單位元組字元轉成雙位元組字元。

vbnarrow* 8* 將字串中雙位元組字元轉成單位元組字元。

vbkatakana** 16** 將字串中平假名字元轉成片假名字元。

vbhiragana** 32** 將字串中片假名字元轉成平假名字元。

vbunicode 64 根據系統的預設碼頁將字串轉成 unicode。

vbfromunicode 128 將字串由 unicode 轉成系統的預設碼頁。

*應用到遠東國別。

**僅應用到日本。

2樓:匿名使用者

看看你的處理中文的**?

測試了下好像沒有出現這樣的問題

vb6程式釋出後,部分內容顯示亂碼????

3樓:匿名使用者

你的編碼格式應該是被改變了。一般是utf-8要是在釋出的時候 轉成別的編碼格式了。

編碼格式改變可能是執行環境的預設字符集被不是系統要求的字符集系統了。

例如日文的軟體中文下肯定亂碼。中文到日文系統下一樣。

你檢查一下。

4樓:匿名使用者

檢查一下那臺機器的區域和語言選項看看。

5樓:匿名使用者

這個其實你在所有label和checkbox上都指定下字型,丟在load裡 一般都解決問題

vb程式在xp裡面就沒有問題

6樓:匿名使用者

在win7裡面使用相容模式執行試試,或者以管理員的身份執行

在win7環境編寫的vb程式在xp執行時無反應

7樓:佼素花東倩

應該是某些控制元件的版本,win7和xp不同,而vb程式呼叫時按相同處理,導致不一致,你可以生成安裝包去安裝試試

8樓:匿名使用者

vb 生成的工程有些是不能直接用在win7上的,win7和xp的核心是不相同的,xp上的控制元件win7不一定有,所以你要在win7上能用,那麼你一定要用打包工具將工程打包,然後安裝在win7上!

列如用: setup factory 7.0 打包效果不錯

所有基於vb6.0編寫的小程式在我的電腦上都無法正常執行。。。 140

9樓:匿名使用者

vb6應用程式在win7-64位執行不成問題,關鍵

==只要含有外掛,就需要安裝註冊(原來在xp下可以免註冊執行)

==需要知道你的程式含有的外掛,然後註冊。

10樓:家林

應該是缺少什麼外掛吧

或者是安裝的vb6.0 期間的一些外掛 不是win 64位的不相容

應該是這方面的問題!

11樓:匿名使用者

相容性問題。。。屬性-相容性-以相容模式執行這個程式-windows xp(service pack 3)

然後再以管理員模式執行此程式

試一下吧

12樓:

你試試安裝一個vb6執行時庫

13樓:讀書沒鳥用

試試右鍵、以管理員身份執行,

一個vb程式 在xp上執行顯示這個,可在win7上沒問題····求助

14樓:

到沒問題的電腦上,把 mscomct2.ocx 拷貝過來,用regsvr32註冊

開啟windows xp 執行vb程式

15樓:匿名使用者

帶執行庫msvbvm60.dll,但有些dll和ocx可能沒有,如果不想註冊,建議程式設計的時候使用api代替

我的XP系統哪些開機程序可以關掉

第一個,qq的,qq開機啟動最煩。你開機慢,需要設定啟動項。我看你有安裝360安全衛士,在高階裡面有啟動項設定,是全中文的註解,你自己就能設定。選擇禁用,不對的話回頭把它恢復了即可。我的機器只有17個程序,加上殺軟和谷歌拼音輸入法,開機自動連線寬頻開機速度在25秒以內 滾動條兩圈半 開始 程式 控制...

利用vb時鐘控制元件做黃綠紅燈轉換的的程序

單燈轉換 紅黃綠一個燈 dim t as integer t val text1.text 1end if t val text2.text 1end if t t 1 if t 0 then case hffff end if text3.text t end sub 控制元件 一個shape,顏...