Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

glasseggs

New Member
Hội viên mới
Cho mình hỏi chút nhé,mình đã biết thay msg box để hiện thì tiếng việt cho VB bằng marco ,nhưng msg box Yes/ No thì thay kiểu gì . Ví dụ như code này thì làm thế nào để hiện thị tiếng việt :

If MsgBox("BAN MUÔN XÓA KHÁCH HÀNG NÀY KHÔNG ?", vbOKCancel, "CUSTOMER RELATION MANAGEMENT SYSTEM") = vbOK Then

Có cách nào để thay thế code trên để hiển thị Vietnamese không ?
Chứ Unicode của VB chỉ hiển thị tiếng việt có thế kia,dấu hỏi và nặng không hiển thị được.

Thanks :momong:
 

haocaocu

Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Bạn vào setting->control panel->Regional and Language Option nó hiện lên khung chọn
Bạn chọn tab languages và check vào mục Install file for complex...(Including Thai) và bỏ đĩa Windows vào cho nó cài đặt.Bên tab advance bạn chọn Vietnamese và khởi động lại máy. Trong code bạn chọn font gõ là Unicode tổ hợp là OK. Còn nhiều cách khác nữa nhưng viết nhiều mệt lắm. Bạn search google có nhièu lắm. Chúc thành công
 

glasseggs

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Rất cám ơn bạn . Nhưng cách này với mình không ổn, vì không thể mang đi máy nào cũng bắt người ta phải đút đĩa và cài thêm ngôn ngữ được,và lại ảnh hưởng đến phần mềm khác của họ như Excel.
 

sinhvienpy89

Mỗi ngày 1 điều mới
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Rất cám ơn bạn . Nhưng cách này với mình không ổn, vì không thể mang đi máy nào cũng bắt người ta phải đút đĩa và cài thêm ngôn ngữ được,và lại ảnh hưởng đến phần mềm khác của họ như Excel.
Bạn tham khao theo LINK sau.Không cần tinh chỉnh hệ thống, vẫn hiện thị được TV dầy đủ.
http://danketoan.com/forum/showpost.php?p=310726&postcount=4
 

glasseggs

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Bạn tham khao theo LINK sau.Không cần tinh chỉnh hệ thống, vẫn hiện thị được TV dầy đủ.
http://danketoan.com/forum/showpost.php?p=310726&postcount=4
Name: tblMessages
Fields: messID (Text, 50), messContent (Text, 255)

messID: chứa một chuỗi để xác định nội dung thông báo, ví dụ: TRUNG_MASO
messContent: chứa nội dung thông báo, ví dụ: Mã số đã bị trùng, vui lòng nhập lại mã số khác.

Làm một cái sub hay function gì đó. Ở đây là sub ví dụ:

Public Sub ThongBao (messID As String)
Dim noidung
noidung = DLookup("messContent", "tblMessages", "messID = '" & messID & "'")
If IsNull(noidung) Then
MsgBox "This error is not recorded."
Else
MsgBox noidung
End If
End Sub

Ở đâu đó cần hiện thông báo thì gọi sub:

ThongBao TRUNG_MASO
Cái này cũng là hiển thị thông báo tiếng việt nhưng đâu phải cái mình cần.
Nó đâ có hiển thị được thông báo xác nhận Yes / No đâu .
Thanks
:mua:
 

xuanthanh

Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Cái này cũng là hiển thị thông báo tiếng việt nhưng đâu phải cái mình cần.
Nó đâ có hiển thị được thông báo xác nhận Yes / No đâu .
Thanks
:mua:
Muốn thể hiện được tiếng vie65t trong MgsBox thì :
1/ Cầu cứu hàm API
2/ Viết một hàm convert font từ font ABC hoặc VNI sang UNI
3/ Cuối cùng viết hàm MsgBoxUni để hiện thông báo bằng tiếng Việt

Bạn có thể tham khảo trong giaiphapexcel.com hoặc gửi yêu cầu vào địa chỉ mail của tôi, tôi sẽ giúp
Email : bachdanggiang_2006@yahoo.com
Thân
 
Sửa lần cuối:

nhannt4

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Cho mình hỏi chút nhé,mình đã biết thay msg box để hiện thì tiếng việt cho VB bằng marco ,nhưng msg box Yes/ No thì thay kiểu gì . Ví dụ như code này thì làm thế nào để hiện thị tiếng việt :

If MsgBox("BAN MUÔN XÓA KHÁCH HÀNG NÀY KHÔNG ?", vbOKCancel, "CUSTOMER RELATION MANAGEMENT SYSTEM") = vbOK Then

Có cách nào để thay thế code trên để hiển thị Vietnamese không ?
Chứ Unicode của VB chỉ hiển thị tiếng việt có thế kia,dấu hỏi và nặng không hiển thị được.

Thanks :momong:
Bạn xem cái này có đúng cái bạn cần không?
http://www.mediafire.com/?fpu10wezxbr435z
 

haquocquan

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Để sử dụng được msgbox tiếng việt. Có hai cách. Bạn dùng bảng mã Unicode hay TCVN3.
Bạn đều phải vào thiết lập hiển thị màn hình.
Chuột phải tại Desktop----> properties-----> Tab: Appearance ---> Advanced: chọn fonts cho Active (Normal, Selected), InActive, và Message Box
- Nếu dùng bảng mã Unicode: chọn kiểu font của Unicode (tốt nhất là chọn Tahoma)
- Nếu dùng bảng mã TCVN3: chọn kiểu font của TCVN3 (tốt nhất là chọn VK Sans Serif)
Thử với DEMO sau ( Theo từng loại fonts sẽ thấy)
http://www.mediafire.com/?ig5e5jeitvir2lr
 

sonthanh

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Cho mình hỏi chút nhé,mình đã biết thay msg box để hiện thì tiếng việt cho VB bằng marco ,nhưng msg box Yes/ No thì thay kiểu gì . Ví dụ như code này thì làm thế nào để hiện thị tiếng việt :

If MsgBox("BAN MUÔN XÓA KHÁCH HÀNG NÀY KHÔNG ?", vbOKCancel, "CUSTOMER RELATION MANAGEMENT SYSTEM") = vbOK Then

Có cách nào để thay thế code trên để hiển thị Vietnamese không ?
Chứ Unicode của VB chỉ hiển thị tiếng việt có thế kia,dấu hỏi và nặng không hiển thị được.

Thanks :momong:
Bạn dùng Macro để thể hiện tiếng Việt là dễ nhất
Tạo Macro mới, trong đó:
Action: MsgBox
Message: "Gõ tiếng Việt tùy ý"
Title: "Gõ tiếng Việt tùy ý"
Gán Macro này cho Event nào đó, rồi chạy -> OK
 

bchip

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Cho mình hỏi chút nhé,mình đã biết thay msg box để hiện thì tiếng việt cho VB bằng marco ,nhưng msg box Yes/ No thì thay kiểu gì ?

Thanks :momong:
Các bác nhìn không gõ câu hỏi thì phải. glasseggs đã nói là msg box Yes/No mà.

Tui nghĩ glasseggs nên mail cho xuanthanh, nhờ bác ấy chỉ giúp. Cách của xuanthanh là chính xác theo yêu cầu của bác đó. Mình làm thử rùi, rất OK.

See you!
 

ngocdiepdo

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Thanks bac nha:xinloinhe:
 

haquocquan

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Có cách nào để thay thế code trên để hiển thị Vietnamese không ?
Chứ Unicode của VB chỉ hiển thị tiếng việt có thế kia,dấu hỏi và nặng không hiển thị được.
Các bác nhìn không gõ câu hỏi thì phải. glasseggs đã nói là msg box Yes/No mà.
Các Pác chạy thử file này xem sao nhé. Thích Unicode có Unicode, thích TCVN3 có TCVN3. Không phải điều chỉnh bất cứ một cái gì trong hệ thống cả (Nếu phải cài lại WIN, cứ cài xong là chạy OK)
Link: http://www.mediafire.com/?bl7dbcf6zb4tzd7
 

glasseggs

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

Úi, cái này mình làm được lâu lắm rùi mà. Cái của haquocquan có phải dùng ham api không.
 

dinhgiang195

New Member
Hội viên mới
Ðề: Làm thế nào để hiển thị tiếng việt trong Msg box Yes/No ?

đơn giản mà bạn.mình có cách này bạn thử xem sao nha.nếu ok thi thanks mình với
msgbox("viết yêu cầu của bạn vào đây",32+4,"thông báo"(hoặc tiêu đề gì khác))=6

---------- Post added at 11:43 PM ---------- Previous post was at 11:41 PM ----------

msgbox("viết yêu cầu của bạn vào đây",32+4,"thông báo"(hoặc tiêu đề gì khác))=6
... close
 

CẨM NANG KẾ TOÁN TRƯỞNG


Liên hệ: 090.6969.247

KÊNH YOUTUBE DKT

Kỹ thuật giải trình thanh tra BHXH

Đăng ký kênh nhé cả nhà

SÁCH QUYẾT TOÁN THUẾ


Liên hệ: 090.6969.247

Top