Access: Font chữ kiểu VNI bị lỗi "Mã" thành "Maơ" khi gán giá trị Trong VBA.

Liên hệ QC

64bit

Thành viên mới
Tham gia
17/9/08
Bài viết
2
Được thích
0
Mình có File Access như sau:
Download file ---> http://www.mediafire.com/?fm0thf95mal50yl

Hồi đó giờ mình vẫn làm vậy được sau bây giờ làm nó lại bị lỗi:
+ (Đặc biệt là chỉ bị chữ "ã") Ở đâu có "ã" là bị
+ Và chỉ bị khi chuỗi nằm trong VBA, VD: MsgBox "Mã hàng là" -> khi Show ra Window là bị thành "Maơ hàng là"

Lỗi là:
Trước khi bấm nó bình thường nhé: (label font kiểu VNI-Times)

Before_click.jpg


Sau sự kiện click to label
Mã:
[FONT=Tahoma][SIZE=3][COLOR=#001155]Private Sub lblMa_hang_Click()
    lblMa_hang.Caption = "Maõ haøng"
    lblMa_hang.BackColor = vbRed
End Sub[/COLOR][/SIZE][/FONT]
1.jpg
[/IMG]
1.jpg


2.jpg



After_click.jpg

Thì chữ mã hàng không còn nguyên nữa, mặc dù trườc giờ mình làm kiểu trên vẫn được, bữa nay tự nhiên bị lỗi hix.

Không lẽ máy mình bị gì chăng. Anh nào biết chỉ giùm em cám ơn.


Còn nữa:

Khi mình copy chữ "Mã hàng" từ VBA sang notepad với đánh trực tiếp lên Notepad (sau 2 cái ra khác nhau) (Kiểu VNI)
File đây:
http://www.mediafire.com/?8f9hwol073jxzi8 (Encode in ANSI)

Chữ ã font mã font VNI là:
61 F5 (cái này đúng)
61 3F (cái này dùng UNIKEY gõ trực tiếp lên notepad định dạng "Encode in ANSI")

Error_1b.jpg


Chẳng lẻ máy mình bị gì chăng. Ai biết chỉ giùm em . Cám ơn nhiều.




 
Lần chỉnh sửa cuối:
Chào bạn,

Theo tôi nghĩ nếu thuộc tính Font của label là "VNI-Times" thì đoạn mã của bạn không có vấn đề gì.
Nhưng tại sau, ở sự kiện CLICK bạn lại đổi Caption làm gì? Đâu cần phải thay đâu, vì bạn chỉ cần thay đổi màu nền của Label thôi mà.

Lê Văn Duyệt
 
Mình chỉ muốn minh họa lỗi của máy mình thôi. Thuộc tính Font VNI-Times hết đó, sử dụng ở máy khác thì không sao, đem qua máy mình làm một đồ án ACCESS thì mới phát hiện ra nó bị lỗi.

Khi trong chuỗi ký tự (1 byte) kiểu VNI mà có "õ" (Mã ASCI là 0xF5 (245 Dec)) hoặc "ì" (mã 0xEC) là nó tự động chuyển sang Unicode (trên VBA) hoặc không cho save, hiện popup đòi chuyển Encoding sang (UTF8) (trên Notepad) hix.
 
Web KT
Back
Top Bottom