|
|
Viết bởi: Quynhhihi 05-07-21, 04:09 PM Chuyên mục: Macro - Bài trả lời (2) |
|
|
Viết bởi: worker 03-07-21, 04:00 PM Chuyên mục: Forms - Bài trả lời (3) |
|
|
Viết bởi: maidinhdan 30-06-21, 03:30 AM Chuyên mục: Thủ thuật VBA - Bài trả lời (18) |
Public Function HamToMau(Chuoi As String, TuCanToMau As String) As String
On Error GoTo Loi
'Chen cac Thu tuc cua ban o day
If IsEmpty(TuCanToMau) Or TuCanToMau = "" Then
HamToMau = Chuoi
Else
HamToMau = Replace(Chuoi, TuCanToMau, "<Font Color=Red><u>" & TuCanToMau & "</Font></u>")
End If
Exit_Loi:
Exit Function
Loi: ' Khi cac Thu tuc loi se nhay den dong duoi day
Err.Clear 'Xoa bo nho Loi
Resume Exit_Loi ' Chay nguoc len dong Exit_Loi: va thoat
End Function
![[Hình: formtim1.jpg]](https://sites.google.com/site/thuthuataccessdemoanh/home/formtim1.jpg)
![[Hình: formtim2.jpg]](https://sites.google.com/site/thuthuataccessdemoanh/home/formtim2.jpg)
<FONT face = "Arial"> Font chữ Arial </FONT> <BR>
<FONT face = "Courier New"> Font chữ Courier New </FONT> <BR>
<FONT face = "Times New Roman"> Font chữ Times New Roman </FONT> <BR>
<FONT size = 6 color = "red" face = "Arial"> Chữ này có kích thước 6 màu đỏ Arial </FONT> <BR>
<B> đậm </B> <BR>
<STRONG> Đây là văn bản được nhấn mạnh </STRONG> <BR>
<I> In nghiêng </I> <BR>
<EM> Đây là văn bản được nhấn mạnh </EM> <BR>
<U> Đây là văn bản được gạch chân </U> <BR>
<TT> Văn bản này bằng phông chữ máy đánh chữ một khoảng cách </TT>
<BR> Văn bản bình thường với <SUB> Chỉ số phụ </SUB>
<BR> Văn bản bình thường với <SUP> Siêu chỉ số </SUP>
<BR>
<FONT color = "black"> chữ này có màu đen </FONT> <BR>
<FONT color = "red"> Chữ này có màu đỏ đ </FONT> <BR>
<FONT color = "blue"> Chữ này có màu xanh lam </FONT> <BR>
<FONT color = "green"> Dòng chữ này có màu xanh lá cây</FONT><BR>
<FONT color = "white"> Dòng chữ này có màu trắng </FONT> <BR>
<FONT color = "cyan"> Văn bản này bằng màu lục lam </FONT> <BR>
<FONT color = "magenta"> Văn bản này có màu đỏ tươi </FONT> <BR>
<FONT color = "yellow"> Dòng chữ này có màu vàng </FONT> <BR>
<FONT color = #000000> Chữ này có màu đen</FONT> <BR>
<FONT color = #FF0000> Chữ này có màu đỏ </FONT> <BR>
<FONT color = #0000FF> Văn bản này có màu xanh lam </FONT> <BR>
<FONT color = #00FF00> Chữ này có màu xanh lá cây</FONT> <BR>
<FONT color = #FFFFFF> Dòng chữ này có màu trắng </FONT> <BR>
<FONT color = #00FFFF> Văn bản này có màu lục lam </FONT> <BR>
<FONT color = #FF00FF> Văn bản này có màu đỏ tươi </FONT> <BR>
<FONT color = #FFFF00> Chữ này có màu vàng </FONT> <BR>
![[Hình: tomauchu.jpg]](https://sites.google.com/site/thuthuataccessdemoanh/home/tomauchu.jpg)
|
|
Viết bởi: doandinhtam 29-06-21, 03:49 PM Chuyên mục: Forms - Bài trả lời (7) |
Private Sub QUEQUAN_Enter()
If (Me.HOVATEN.Value) <> 0 And Len(Me.QUEQUAN.Text) < 1 Then
Me.QUEQUAN.Text = DLookup("QUEQUAN", "tbl_NKT1", "ID =" & Me.ID - 1)
End If
End Sub
|
|
Viết bởi: doandinhtam 28-06-21, 10:55 AM Chuyên mục: Forms - Bài trả lời (1) |
| Chủ đề Mới nhất |
| 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,345 |
| 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: 146 |
| 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: 160 |
| 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,101 |
| 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: 182 |
| Đồ 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: 660 |
| Tra cứu thông tin DN qua ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-02-06-26, 11:36 PM- » Bài trả lời: 0- » Lượt xem: 186 |
| Homestay chill đà lat -Chuyên mục: Góc Blogger-Đăng bởi lần cuối: tt1212-01-06-26, 02:51 PM- » Bài trả lời: 0- » Lượt xem: 632 |
| Quản lý quầy thuốc nhỏ lẻ -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-09-05-26, 11:24 AM- » Bài trả lời: 4- » Lượt xem: 3,615 |
| TẠO THÔNG BÁO NHẮC NHỞ CÔ... -Chuyên mục: Tương tác Chương trình ngoài-Đăng bởi lần cuối: ongke0711-07-04-26, 10:46 AM- » Bài trả lời: 2- » Lượt xem: 285 |
| 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 đủ |