在系統(tǒng)制作中經(jīng)常會遇到一些特殊符號,在Windows現(xiàn)有的內(nèi)碼字庫中無法找到,這個時候我們就需要自己造字.
首先我們使用TRUETYPE造字程序,造出自己需要的字符,每個字符對應(yīng)一個16進制的內(nèi)碼,在程序中我們可以通過先將16進制內(nèi)碼轉(zhuǎn)換為10進制的長整型數(shù)據(jù),再使用CHR(value as Long) As String 這個函數(shù)來訪問返回該字符.舉個例子:
Private Sub Form_Load()
Debug.Print Chr(&HAAA1)
End Sub
這個例子的意思是使用Debug.Print 方法在及時窗口打印出內(nèi)碼地址為AAA1的字符&H的作用是將AAA1轉(zhuǎn)換為10進制.
現(xiàn)在造字的問題解決了,接下來的問題就是如何進行字符移植.因為我們在本機造出來的字如果不進行字符移植的話,在其他計算機使用上訴的方式是顯示不出來字的.所以這個時候我們需要移植.移植的方式如下:
1.將系統(tǒng)安裝目錄下Fonts文件夾中的EUDC.*文件全部拷貝到其他計算機的相同目錄下
2.打開注冊表,找到HKEY_CURRENT_USER\EUDC.
3.該鍵下有
932 (Japanese Shift-JIS) 日文系統(tǒng)
936 (Simplified Chinese GBK) 簡體中文系統(tǒng)
949 (Korean) 韓文系統(tǒng)
950 (Traditional Chinese Big5) 繁體中文系統(tǒng)
選擇你所對應(yīng)的鍵
4.在里面將SystemDefaultEUDCFont鍵值修改為你的EUDC.TTE的絕對路徑.
這樣整個移植過程就完成了!
首先我們使用TRUETYPE造字程序,造出自己需要的字符,每個字符對應(yīng)一個16進制的內(nèi)碼,在程序中我們可以通過先將16進制內(nèi)碼轉(zhuǎn)換為10進制的長整型數(shù)據(jù),再使用CHR(value as Long) As String 這個函數(shù)來訪問返回該字符.舉個例子:
Private Sub Form_Load()
Debug.Print Chr(&HAAA1)
End Sub
這個例子的意思是使用Debug.Print 方法在及時窗口打印出內(nèi)碼地址為AAA1的字符&H的作用是將AAA1轉(zhuǎn)換為10進制.
現(xiàn)在造字的問題解決了,接下來的問題就是如何進行字符移植.因為我們在本機造出來的字如果不進行字符移植的話,在其他計算機使用上訴的方式是顯示不出來字的.所以這個時候我們需要移植.移植的方式如下:
1.將系統(tǒng)安裝目錄下Fonts文件夾中的EUDC.*文件全部拷貝到其他計算機的相同目錄下
2.打開注冊表,找到HKEY_CURRENT_USER\EUDC.
3.該鍵下有
932 (Japanese Shift-JIS) 日文系統(tǒng)
936 (Simplified Chinese GBK) 簡體中文系統(tǒng)
949 (Korean) 韓文系統(tǒng)
950 (Traditional Chinese Big5) 繁體中文系統(tǒng)
選擇你所對應(yīng)的鍵
4.在里面將SystemDefaultEUDCFont鍵值修改為你的EUDC.TTE的絕對路徑.
這樣整個移植過程就完成了!