|
|
Viết bởi: tt1212 02-06-15, 04:34 PM Chuyên mục: Forms - Bài trả lời (2) |
|
|
Viết bởi: cudnav 01-06-15, 05:38 PM Chuyên mục: Tương tác Chương trình ngoài - Bài trả lời (3) |
|
|
Viết bởi: tt1212 01-06-15, 01:36 AM Chuyên mục: Forms - Bài trả lời (5) |
|
|
Viết bởi: tranthanhan1962 31-05-15, 08:10 PM Chuyên mục: Forms - Bài trả lời (20) |
![[Hình: UsxbFSI.png]](http://i.imgur.com/UsxbFSI.png)
![[Hình: IWfZadT.png]](http://i.imgur.com/IWfZadT.png)
|
|
Viết bởi: tranthanhan1962 31-05-15, 04:02 PM Chuyên mục: Thư viện thủ thuật - Bài trả lời (15) |
![[Hình: X7vxJzF.png]](http://i.imgur.com/X7vxJzF.png)
![[Hình: Mvt7qrz.png]](http://i.imgur.com/Mvt7qrz.png)
Function VietUniMsgBox(Prompt As String, _
Optional Buttons As VbMsgBoxStyle = vbOKOnly, _
Optional Title As String = vbNullString, _
Optional HelpFile As Variant, _
Optional Context As Variant) _
As VbMsgBoxResult
If IsMissing(HelpFile) Or IsMissing(Context) Then
FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
""", " & Buttons & ", """ & Title & """)")
Else
FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
""", " & Buttons & ", """ & Title & """, """ & _
HelpFile & """, " & Context & ")")
End If
End Function
VietUniMsgBox DLookup("[ND]", "TB", "[ID] = 2"), vbCritical + vbAbortRetryIgnore, DLookup("[ND]", "TB", "[ID] = 1")
VietUniMsgBox DLookup("[ND]", "TB", "[ID] = 4"), vbExclamation + vbSystemModal, DLookup("[ND]", "TB", "[ID] = 3")
VietUniMsgBox DLookup("[ND]", "TB", "[ID] = 6"), vbQuestion, DLookup("[ND]", "TB", "[ID] = 5")
VietUniMsgBox ChrW(272) & "ây là MsgBox Ti" & ChrW(7871) & "ng Vi" & ChrW(7879) _
& "t!@Không l" & ChrW(7895) & "i Font Unicode ti" & ChrW(7871) & "ng Vi" _
& ChrW(7879) & "t.@Có th" & ChrW(7875) & " t" & ChrW(7841) & "o ch" & _
ChrW(7919) & " nét " & ChrW(273) & ChrW(7853) & "m.", vbCritical + _
vbAbortRetryIgnore, "Msg Box Ti" & ChrW(7871) & "ng Vi" & ChrW(7879) & "t"
VietUniMsgBox "Th" & ChrW(7911) & " thu" & ChrW(7853) _
& "t Acess là trang web b" & ChrW(7893) & " ích cho m" _
& ChrW(7885) & "i ng" & ChrW(432) & ChrW(7901) & "i.", _
vbExclamation + vbSystemModal, "Trân tr" & ChrW(7885) _
& "ng thông báo!"
VietUniMsgBox " Công cha nh" & ChrW(432) & _
" núi thái s" & ChrW(417) & "n." & vbCrLf & _
"Ngh" & ChrW(297) & "a m" & ChrW(7865) & " nh" _
& ChrW(432) & " n" & ChrW(432) & ChrW(7899) & _
"c trong ngu" & ChrW(7891) & "n ch" & ChrW(7843) _
& "y ra.", vbQuestion, "Ca dao Vi" & ChrW(7879) & "t Nam"
| Chủ đề Mới nhất |
| nv casino — практический ... -Chuyên mục: MS Word-Đăng bởi lần cuối: MichaelHieta-9 Giờ trước- » Bài trả lời: 0- » Lượt xem: 1 |
| Peptide research and refe... -Chuyên mục: MS Word-Đăng bởi lần cuối: CarlosDug-Hôm nay, 09:53 AM- » Bài trả lời: 0- » Lượt xem: 1 |
| SkfterjeadS -Chuyên mục: MS Word-Đăng bởi lần cuối: Danielapams-Hôm nay, 09:22 AM- » Bài trả lời: 0- » Lượt xem: 3 |
| tripscan — Почему предска... -Chuyên mục: MS Word-Đăng bởi lần cuối: NicholasAxiot-Hôm nay, 06:38 AM- » Bài trả lời: 0- » Lượt xem: 3 |
| Quản Lý Phòng Khám Tư Nhâ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: Le Duc-24-09-26, 12:03 AM- » Bài trả lời: 34- » Lượt xem: 8,368 |
| Tạo Form không có khung v... -Chuyên mục: Thư viện thủ thuật-Đăng bởi lần cuối: ongke0711-05-09-26, 10:12 PM- » Bài trả lời: 0- » Lượt xem: 160 |
| Tải hàng loạt hóa đơn PDF... -Chuyên mục: Thành viên giúp nhau-Đăng bởi lần cuối: dotrung-16-08-26, 10:29 PM- » Bài trả lời: 6- » Lượt xem: 164 |
| Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: AKBui-09-08-26, 12:52 AM- » Bài trả lời: 77- » Lượt xem: 8,172 |
| Tra cứu Mã số thuế - phần... -Chuyên mục: Share Code-Đăng bởi lần cuối: ongke0711-03-07-26, 02:10 PM- » Bài trả lời: 0- » Lượt xem: 185 |
| Đồ cổ đây - một chút hoài... -Chuyên mục: Góc ảnh-Đăng bởi lần cuối: Noname-12-06-26, 09:21 AM- » Bài trả lời: 1- » Lượt xem: 670 |
| Diễn đàn Thống kê |
|
» Thành viên: 0 » Thành viên mới nhất: Không có ai » Các chủ đề diễn đàn: 0 » Các bài viết diễn: 0 Thống kê đầy đủ |