tailieunhanh - Hiển thị tiếng Việt Unicode trong VB6 dễ dàng hơn!

Trước hết, tôi cũng xây dựng một hàm tương tự như hàm CharUnicode và cũng thêm vào hộp công cụ của VB các điều khiển (control) của MS Forms như hướng dẫn của anh Bằng. Nhưng tôi đặt tên hàm là Viethoa (Việt hóa) và tạo ra chức năng chuyển thành mã tiếng Việt Unicode đối với chuỗi được gõ vào theo cách như khi bạn gõ tiếng Việt với kiểu gõ VNI (đoạn mã 1). Ví dụ, khi bạn muốn hiển thị cụm từ "Tiếng Việt", bạn chỉ cần viết đoạn mã như sau: Private Sub Form_Load() =. | Hiển thị tiếng Việt Unicode trong VB6 dễ dàng hơn Trước hết tôi cũng xây dựng một hàm tương tự như hàm CharUnicode và cũng thêm vào hộp công cụ của VB các điều khiển control của MS Forms như hướng dẫn của anh Bằng. Nhưng tôi đặt tên hàm là Viethoa Việt hóa và tạo ra chức năng chuyển thành mã tiếng Việt Unicode đối với chuỗi được gõ vào theo cách như khi bạn gõ tiếng Việt với kiểu gõ VNI đoạn mã 1 . Ví dụ khi bạn muốn hiển thị cụm từ Tiếng Việt bạn chỉ cần viết đoạn mã như sau Private Sub Form_Load Viethoa Tie61ng Vie65t End Sub Bạn có thể làm tương tự để dùng kiểu gõ khác mà bạn ưa thích. Chúc bạn thành công Đoạn mã 1 Function Viethoa chuoi As String Dim i As Integer Dim j As Integer For j 1 To 2 For i 2 To Len chuoi Select Case Mid chuoi i 1 Case 1 a If Mid chuoi i - 1 1 a Then chuoi Left chuoi i - 2 ChrW HE1 Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 A Then chuoi Left chuoi i - 2 ChrW HC1 Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 ChrW HE2 Then chuoi Left chuoi i - 2 ChrW H1EA5 Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 ChrW HC2 Then chuoi Left chuoi i - 2 ChrW H1EA4 Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 ChrW H103 Then chuoi Left chuoi i - 2 ChrW H1EAF Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 ChrW H102 Then chuoi Left chuoi i - 2 ChrW H1EAE Right chuoi Len chuoi - i End If e If Mid chuoi i - 1 1 e Then chuoi Left chuoi i - 2 ChrW HE9 Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 E Then chuoi Left chuoi i - 2 ChrW HC9 Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 ChrW HEA Then chuoi Left chuoi i - 2 ChrW H1EBF Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 ChrW HCA Then chuoi Left chuoi i - 2 ChrW H1EBE Right chuoi Len chuoi - i End If i If Mid chuoi i - 1 1 i Then chuoi Left chuoi i - 2 ChrW HED Right chuoi Len chuoi - i End If If Mid chuoi i - 1 1 I Then chuoi Left chuoi i - 2 ChrW HCD Right chuoi Len chuoi - i End If o If Mid chuoi i - 1 1 o Then chuoi

• Kỹ thuật lập trình
• Kỹ thuật lập trình
• Phần cứng
• Công nghệ thông tin
• Tin học
• Quản trị mạng
• kỹ thuật máy tính C
• kỹ thuật lập trình C
• giáo trình kỹ thuật lập trình C
• bài tập kỹ thuật lập trình C
• tài liệu kỹ thuật lập trình C
• chuyên ngành kỹ thuật lập trình
• Bài tập kỹ thuật lập trình
• Tài liệu kỹ thuật lập trình
• Bài giảng kỹ thuật lập trình
• Ưng dụng kỹ thuật lập trình
• Ngôn ngữ C
• kỹ thuật máy tính
• môn kỹ thuật lập trình
• ôn tập kỹ thuật lập trình
• cách học kỹ thuật lập trình
• kiến thức kỹ thuật lập trình
• học môn kỹ thuật lập trình
• Đề thi Kỹ thuật lập trình cơ bản
• Câu hỏi Kỹ thuật lập trình cơ bản
• Luyện thi Kỹ thuật lập trình cơ bản
• Ôn thi Kỹ thuật lập trình cơ bản
• Bài thi Kỹ thuật lập trình cơ bản
• Tài liệu Kỹ thuật lập trình cơ bản
• giáo trình kỹ thuật lập trình
• thủ thuật lập trình
• lập trình căn bản
• kỹ thuật phần mềm
• chương trình lập trình
• giáo trình lập trình
• lập trình hướng đối tượng
• tài liệu lập trình
• chuyên ngành lập trình
• tổng quan về lập trình
• Tổng quan về kỹ thuật lập trình
• Lập trình tốt
• Nguyên tắc lập trình
• Ngôn ngữ lập trình
• ngôn ngữ C++
• Kỹ thuật lập trình căn bản
• Kỹ thuật lập trình nâng cao
• Lập trình C căn bản
• Lập trình C nâng cao