• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Tạo giao diện tiếng Trung trong VB6

Các bài viết hướng dẫn, giúp các bạn hiểu và tiếp cận với Visual Basic nhanh hơn
QuangHoa
Guru
Guru
Bài viết: 542
Ngày tham gia: T.Năm 27/03/2008 9:02 am
Đến từ: Quê hương Đại tướng Võ Nguyên Giáp
Been thanked: 5 time
Liên hệ:

Tạo giao diện tiếng Trung trong VB6

Gửi bàigửi bởi QuangHoa » T.Tư 25/06/2008 8:54 pm

Tên bài viết: Tạo giao diện tiếng Trung trong VB6
Tác giả: Võ Quang Hoa
Cấp độ bài viết: Chưa đánh giá
Tóm tắt: Tạo chương trình trong VB6 hiển thị tiếng Trung


------------------
Có ai quan tâm đến cái này không, sau đây mình sẻ lần lượt giới thiệu cách thức qua 2 bài viết tương đối dài, hi vọng được ủng hộ của mọi người. Chắc là không sớm thì muộn sẻ có người cần nó.


朋友
这些年一个人风也过雨也走,有过泪有过错还记得坚持什么。
真爱过才会懂会记没会回手,终有梦中有你在心中。
朋友一生一起走那些日子不再有,一句话一辈子一生情一杯九。
朋友不曾孤单过一声朋友你会懂,还有伤还有痛还要走还有我。

QuangHoa
Guru
Guru
Bài viết: 542
Ngày tham gia: T.Năm 27/03/2008 9:02 am
Đến từ: Quê hương Đại tướng Võ Nguyên Giáp
Been thanked: 5 time
Liên hệ:

Bài 1: cài đặt ngôn ngữ và tạo bàn phím

Gửi bàigửi bởi QuangHoa » T.Tư 25/06/2008 9:03 pm

1. Hướng dẫn cài đặt Window để hiển thị tiếng Trung
Cũng giống như tiếng Việt để có thể hiển thị tiếng Trung trong VB nhất thiết phải dùng Font Unicode nhưng một số máy tính do chưa được cài đặt để hỗ trợ tiếng Trung thì cho dù người lập trình có cố gắng dung Unicode đi chăng nửa thì cũng không thể hiển thị được, do vậy nên cài đặt một chút. Hãy nhìn dòng chử sau nếu bạn thấy đó là tiếng Trung thì máy bạn đang ngồi hỗ trợ tiếng Trung còn không thì tức là đã không hỗ trợ, cần phải cài đặt:
我学立程
Chuẩn bị, một đĩa Window còn dùng tốt và yêu cầu khoảng hơn 200Mb ổ đĩa cứng.
Đầu tiên bạn vào Control Panel chọn Regional and Language Option, (hoặc vào Start chọn Run, gõ intl.cpl click OK) hộp thoại Regional and Language Option hiện ra bạn chọn Tab Languages
Hình ảnh
Tiếp theo bạn đánh dấu chọn vào nút Install files for East Asian languages để cài đặt ngôn ngữ châu Á, Bạn cũng có thể cài đặt ngôn ngữ cho một số ngôn ngữ khác nửa như Arập, Thái Lan… bằng cách bấm chọn vào ô Install files for complex scrip and right-to-left languages. Một cửa sổ xuất hiện cho mỗi lần bạn đánh hoặc bỏ chọn, bạn bấm OK.
Hình ảnh
Tiếp đó bạn đưa đĩa Window vào ổ đĩa, bấm Apply thì hộp thoại Copy xuất hiện, bạn đợi cho đến lúc hoàn tất
Hình ảnh
Copy xong Window yêu cầu khởi động lại máy, bạn lấy đĩa ra khỏi ổ rồi bấm Yes, máy tính sẻ khởi động lại.

Hình ảnh
Khởi động xong là máy tính đã thực sự hỗ trợ Tiếng Hoa và bạn sẻ thấy tiếng Trung cũng được hiển thị một cách đàng hoàng như tiếng Anh và tiếng Việt vậy.
Hình ảnh
2. Hướng dẫn tạo bộ gõ tiếng Trung.
2.1 Dùng phần mềm NJStar Chinese WP.
Giới thiệu: Đây là một phần mềm được sử dụng khá rộng rãi hiện nay. Với dung lượng rất nhỏ file cài đặt chỉ chưa đầy 5.6Mb, cài xong dung lượng cũng chỉ tăng gấp đôi tuy nhiên những tính năng của nó có thể coi là tuyệt vời. Dùng phần mềm này ưu điểm là nhẹ, đơn giản nhưng nhược điemr là bạn phải soạn thảo ngay bên trong cửa sổ của nó chứ không thể soạn ở bên ngoài được. Có thể gọi nó là miễn phí vì bạn sẻ không bắt buộc phải trả bất kỳ một chút nào để sử dụng với đầy đủ tất cả các tính năng trong thời gian không hạn chế. Cũng có thể gọi là có phí vì vào mục Help có phần Register, một mẫu đăng ký với bảng giá xuất hiện(Nếu xem thì tương đối đắt). Thật ra đây là hình thức cũng tương tự như BKAV Pro của bên ta vậy, có điều bên BKAV Pro thì nếu không đăng ký sẻ bị giới hạn tính năng còn NJStar thì không.
Hình ảnh
Những chức năng chủ yếu của NJStar
• Một phần mềm soạn thảo văn bản với những tính năng khá cơ bản.
• Một phần mềm, một bộ gõ tiếng Trung hỗ trợ khá nhiều kiểu gõ, bảng mã. Tôi sẻ hướng dẫn cách gõ sau.
• Một phần mềm có những bài học về chử Hán, khá hay.
• Khá nhiều tiện ích xử lý tiếng Hoa và ngôn ngữ Có hẳn bộ từ điển Trung-Anh nó được sử dụng cực kỳ linh hoạt chỉ cần đưa chuột đến một từ là nghĩa tiếng Anh lập tức xuất hiện.
Xem giao diện của nó
Hình ảnh
Hướng dẫn cách gõ tiếng Trung theo kiểu PinYin (字词拼音), đây là kiểu gõ cơ bản dựa theo phiên âm Latinh của Tiếng Trung. Lưu ý là bạn phải tắt tất cả các bộ gõ tiếng Việt trước khi thử vì những phần mềm này rất “kị” nhau, không thể chạy chung được.
Cú pháp chung <Các chử cái trong phiên âm><vị trí trong bảng đồng âm>
Ví dụ bạn gõ câu我爱你 câu này phiên âm là Woaini bạn gõ wo <space> ai <space> ni <space> thì kết quả sẻ ra đúng như trên, vì những từ này quen thuộc hay dùng nên được ưu tiên hiển thị và NJStar sẻ dễ dàng nhận ra chúng. <Space> tương đương với số 1 là từ đầu tiên trong bảng từ đồng âm

Ví dụ khác, bạn muốn gõ từ立程 (Lập trình) từ này có phiên âm là (Licheng) bị trùng âm với từ 里程(Lý Trình), và NJStar nhận ra từ này trước khi đó bạn phải xem bảng từ đồng âm để chọn cho đúng và phải gõ lại là Li5cheng 1 hoặc là Li5cheng<Space>.
Một kiểu nửa là kiểu南极连拼là kiểu gõ nhanh, bạn không cần phải gõ từng từ một mà chỉ cần gõ luôn một mạch các từ sau đó m <Space> thì chử sẻ xuất hiện, đây là kiểu dùng trong Window. Ví dụ gõ 我爱你bạn chỉ cần gõ woaini <space> là được.

2.2 Tạo bộ gõ ngay trong Window.
Sau khi cài đặt ngôn ngữ, bạn cũng có thể tạo ngay một bộ gõ tiếng Trung dễ dàng.
Đầu tiên bạn vào Start chọn Run, gõ intl.cpl click OK) để mở hộp thoại Regional and Language Option. Bạn chọn thẻ Language bấm vào nút Details..
Hình ảnh
Bạn bấm Add trong cửa sổ Text Service and Input language mục Settings.
Hình ảnh
Tiếp tục bạn chọn Input Language ngôn ngữ bắt đầu bởi “Chinese..” và chọn Keyboard Layout, xem ví dụ tôi chọ dưới đây
Hình ảnh
Hình ảnh
Bạn qua thẻ Advance sẻ thấy 2 nút chọn, chọn nút phía trên để có thể làm việc với các cửa sổ trong Window. Còn cái ở phía dưới là để dành lúc nào bạn muốn tắt bộ gõ đi thì chọn nó. Nhấp OK vài lần để tắt tất cả các cửa sổ, thế là bạn đã tạo được bộ gõ rồi đấy, bạn có thể tự do gõ ở mọi nơi mà bạn muốn, cách gõ cũng giống với cách gõ 南极连拼 tôi đã giới thiệu trên, hãy xem đây.
Hình ảnh
Hình ảnh
Hình ảnh
Hình ảnh
Hình ảnh
Nếu cảm thấy bất tiện bạn có thể thêm hoặc loại bỏ một số bàn phím phù hợp với nhu cầu.

Hình ảnh
Và có thể tạo phím tắt để di chuyển qua lại giữa các bàn phím
Hình ảnh
Sửa lần cuối bởi QuangHoa vào ngày T.Năm 26/06/2008 3:26 pm với 1 lần sửa.
朋友
这些年一个人风也过雨也走,有过泪有过错还记得坚持什么。
真爱过才会懂会记没会回手,终有梦中有你在心中。
朋友一生一起走那些日子不再有,一句话一辈子一生情一杯九。
朋友不曾孤单过一声朋友你会懂,还有伤还有痛还要走还有我。

QuangHoa
Guru
Guru
Bài viết: 542
Ngày tham gia: T.Năm 27/03/2008 9:02 am
Đến từ: Quê hương Đại tướng Võ Nguyên Giáp
Been thanked: 5 time
Liên hệ:

Phần 2

Gửi bàigửi bởi QuangHoa » T.Năm 26/06/2008 3:24 pm

Phần 2:

Sau khi đã tạo được bàm phím gõ tiếng Trung, ta bắt đầu làm việc với VB6.

Để hiển thị tiếng Trung ta phải dùng những Control hỗ trợ Unicode chẳng hạn như bộ Control Microsoft Form 2.0 Object Library v.v…

Nhớ lại rằng khi xử lý tiếng Việt ta có thể dùng một số hàm chuyển đổi đơn giản từ các bảng mã như VNI, TCVN... sang Unicode bởi vì trong tiếng Việt không có quá nhiều ký tự Unicode nhưng khi làm việc với Tiếng Trung thì lại không thể vì tiếng Trung có quá nhiều ký tự nên không thể làm như vậy được. Khắc phục điều trên tôi đưa ra giải pháp chuyển từ ký tự tiếng Trung qua mã Unicode lúc thiết kế chương trình.

Nó có 2 dạng sau:

1: Chuyển ký tự sang mã Code chẳng hạn 武光和có mã tương ứng là 6B665149548C, ở đây có tất cả 3 (chử tiếng trung) * 4 (mỗi chử có 4 ) là 12 số thập lục phân, mục đích là ta có thể đưa dãy số thập lục phân vào properties của control. Rồi sau đó ta sẻ chuyển ngược lại khi chương trình hoạt động.

2: Chuyển ký tự sang mã của VB6 . Ví dụ với chuổi 武光和 ta có thể chuyển qua thành ChrW(&H6B66) & ChrW(&H5149) & ChrW(&H548C), mục đích là có thể đưa trực tiếp vào cửa sổ soạn thảo code.

Cả hai kiểu chuyển này tôi đã làm sẳn một chương trình nhỏ cho các bạn sử dụng, các bạn chỉ việc nhập ký tự tiếng Trung vào ô trên cùng thì chương trình sẻ tự động “biên dịch” sang mã cần dùng
Hình ảnh
Hình ảnh
Sau khi đã có Code rồi thì ta sẻ sử dụng chúng.

Với lại Code dạng thập lục phân, ta cần một hàm nhỏ để chuyển đổi chuổi số đó trở về chử Trung, không phức tạp lắm, hàm đó đơn giản chỉ là

Mã: Chọn hết

  1. Function UnicodeNumber2Text(inputstring As String) As String
  2.  
  3.     Dim i As Long
  4.  
  5.     Dim stringtemp As String
  6.  
  7.     On Error Resume Next
  8.  
  9.     stringtemp = ""
  10.  
  11.     For i = 1 To Len(inputstring) Step 4
  12.  
  13.         stringtemp = stringtemp & ChrW(CLng("&H" & Mid(inputstring, i, 4)))
  14.  
  15.        
  16.  
  17.     Next
  18.  
  19.     UnicodeNumber2Text = stringtemp
  20.  
  21. End Function


Ví dụ, một Commad cần hiển thị hai ký tự越南, chúng biên dịch ra mã Hex là 8D8A5357 thế thì bạn copy chuổi số này và đặt vào thuộc tính Caption của Commad trong cửa sổ Properties Window và trong sự kiện Form_Load sẻ sử dụng là

Mã: Chọn hết

  1. Private Sub Form_Load()
  2.  
  3. CommandButton1.Caption = UnicodeNumber2Text(CommandButton1.Caption)
  4.  
  5. End Sub

Còn nếu sử dụng dạng mã VB, từ 越南 được chương trình biên dịch thành ChrW(&H8D8A) & ChrW(&H5357) thì bạn chỉ việc sử dụng, chẳng hạn như trong sự kiện Form_load

Mã: Chọn hết

  1. Private Sub Form_Load()
  2.  
  3. CommandButton1.Caption = ChrW(&H8D8A) & ChrW(&H5357)
  4.  
  5. End Sub



Kết: ở đây là tôi hướng dẫn hiển thị tiếng Trung trong VB6, ngoài ra nếu bạn muốn sử dụng các ngôn ngữ khác nhưng tiếng Hàn, Nhật, hay bất kỳ một ngôn ngữ nào trên thế giới thì cũng hoàn toàn tương tự nhưng duy chỉ có điều yêu cầu bắt buộc là ngôn ngữ đó đã được hỗ trợ trong bảng mã Unicode.
Tập tin đính kèm
Charater.rar
(10.58 KiB) Đã tải 1218 lần
朋友
这些年一个人风也过雨也走,有过泪有过错还记得坚持什么。
真爱过才会懂会记没会回手,终有梦中有你在心中。
朋友一生一起走那些日子不再有,一句话一辈子一生情一杯九。
朋友不曾孤单过一声朋友你会懂,还有伤还有痛还要走还有我。

bapcai
Thành viên chính thức
Thành viên chính thức
Bài viết: 18
Ngày tham gia: CN 16/01/2011 1:34 am

Re: Tạo giao diện tiếng Trung trong VB6

Gửi bàigửi bởi bapcai » T.Ba 18/01/2011 7:05 pm

Anh ơi sao em làm giống như anh chỉ mà nó ko hiện ra chữ 越南 mà hiện ra ?? . Anh làm ơn chỉ em với!Cam ơn anh nhiều!

phisonnet
Bài viết: 3
Ngày tham gia: T.Tư 10/11/2010 3:29 pm

Re: Tạo giao diện tiếng Trung trong VB6

Gửi bàigửi bởi phisonnet » T.Sáu 22/04/2011 4:02 pm

bạn cho mình hỏi là làm thế nào để chuyển kí tự tiếng trung sang dạng code để từ code qua unicode ạ?

botre137
Thành viên chính thức
Thành viên chính thức
Bài viết: 15
Ngày tham gia: T.Sáu 04/03/2011 10:19 pm
Đến từ: thanh hoa
Has thanked: 2 time
Been thanked: 5 time

Re: Tạo giao diện tiếng Trung trong VB6

Gửi bàigửi bởi botre137 » T.Ba 10/05/2011 7:50 am

sao em làm không được nhỉ?


Quay về “[VB] Bài viết hướng dẫn”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.0 khách