我想寫一程序,當該系統安裝在繁體系統中各控件的caption顯示為繁體,安裝在簡體系統時顯示為簡體,請大俠給簡單代號告知就可以,比如一vb工程文件
中隻有一個form1,form 中有一個label1當在繁體時label1上的字顯示為繁體字,當在簡體時label1上的字顯示為簡體字。請大哥郵寄到:
[email protected]中,謝謝!
中隻有一個form1,form 中有一個label1當在繁體時label1上的字顯示為繁體字,當在簡體時label1上的字顯示為簡體字。請大哥郵寄到:
[email protected]中,謝謝!
中文(中国) 2052
中文(台湾) 1028
Declare Function GetSystemDefaultLCID Lib "kernel32" Alias "GetSystemDefaultLCID" () As Long
这一个过程中,你加入这个测试代码,不过得测试一下繁体系统的LCID是多少
dim i as long
i=GetSystemDefaultLCID
if i=2052 then
label1.caption="中文"
elseif i=1028 then
label1.caption="繁体"
end if
lable1.refresh
再用使用资源文件就可以