• [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    AnNguyen > 08-07-21, 09:42 AM

    Cho em xin 1 bản với nhé!
    annguyen9124@gmail.com
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    ledangvan > 21-07-21, 11:04 PM

    (30-06-21, 03:30 AM)maidinhdan Đã viết:
    Hình mình họa, demo thì Post sau, gần 3 giờ sáng rồi.
    Code có 1 dòng và cũng không cần chèn thư viện gì hết, chạy trên mọi địa hình....
    Như Highlight mà không phải  định dạng HightLight nhé: có thể In đậm, nghiêm, gạch dưới.... size to thì chưa thử.... 015

    Hàm Tô màu chữ:
    Mã PHP:
    Public Function HamToMau(Chuoi As StringTuCanToMau 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_Loiva thoat
    End 
    Function 


    Ví dụ 1:
    [Hình: formtim1.jpg]



    Ví dụ 2:
    [Hình: formtim2.jpg]



    Bổ sung Code:
    Mã PHP:
    <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>
    <
    IIn 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>
    <
    TTVăn bản này bằng phông chữ máy đánh chữ một khoảng cách </TT>
    <
    BRVăn bản bình thường với <SUBChỉ số phụ </SUB>
    <
    BRVăn bản bình thường với <SUPSiê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]
    Ai cần Code xin để lại Email

    Cho anh một bản Office 2003 với, anh cảm ơn nhiều : Ledangvan06@gmail.com
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    ledangvan > 15-08-21, 02:46 PM

    Cho anh một bản Office 2003 với, anh cảm ơn nhiều : Ledangvan06@gmail.com
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    paulsteigel > 21-08-21, 10:52 PM

    (15-08-21, 02:46 PM)ledangvan Đã viết: Cho anh một bản Office 2003 với, anh cảm ơn nhiều : Ledangvan06@gmail.com

    Văn ơi, Office 2003 không hỗ trợ HTML trong form và grid nên nếu Văn muốn highlight nó thì phải dùng võ khác, highlight cả row hoặc thiết kế một continous form (form liên tục) và hiển thị dững cái cần highlight bằng các thuộc tính của textbox thôi!
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    ledangvan > 22-08-21, 02:48 PM

    (21-08-21, 10:52 PM)paulsteigel Đã viết:
    (15-08-21, 02:46 PM)ledangvan Đã viết: Cho anh một bản Office 2003 với, anh cảm ơn nhiều : Ledangvan06@gmail.com

    Văn ơi, Office 2003 không hỗ trợ HTML trong form và grid nên nếu Văn muốn highlight nó thì phải dùng võ khác, highlight cả row hoặc thiết kế một continous form (form liên tục) và hiển thị dững cái cần highlight bằng các thuộc tính của textbox thôi!

    Hì, tại ở trên Maidinhdan nói là dùng chạy được ở Ofice 2003 nên mình mới hỏi xin để xem cách xử lý vấn đề. Cái này mình cũng có tìm hiểu rất nhiều nhưng đúng là office 2003 ko hỗ trợ
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    paulsteigel > 23-08-21, 12:12 PM

    (22-08-21, 02:48 PM)ledangvan Đã viết: Hì, tại ở trên Maidinhdan nói là dùng chạy được ở Ofice 2003 nên mình mới hỏi xin để xem cách xử lý vấn đề. Cái này mình cũng có tìm hiểu rất nhiều nhưng đúng là office 2003 ko hỗ trợ

    Mình không cho rằng như vậy, tạm phân tích như thế này:
    Access 2003: thiết kế cũ, dựa vào OLE cũ (không hỗ trợ nhúng Html trong điều khiển) và chưa được để ý đên lớp trình diễn
    Access 2007 trở lên thì được thiết kế trên nền tảng XML và đủ các điều khiển để hỗ trợ các kiểu highlight trong lớp trình diễn.

    Để làm được với 2003 thì bạn cần một activeX dạng lưới dữ liệu mới để hiển thị text dạng HTML (Ví dụ vsFlex 7 trở lên là ok rồi). Tôi từng băn khoăn vấn đề này từ 2000 và sau đó phải đi theo giải pháp dùng VsFlexgrid.

    Với tình huống của bạn, có thể không nhất thiết phải bắt buộc làm như thế, thay vì hiển thì và highligh từ tìm kiếm thì hiển thị bản ghi có từ tìm kiếm và đặt trong dấu []  chẳng hạn, chỉ cần thêm từ replace(a.fieldSearch,txtfind,"[" & txtfind & "]") as fldResult thì cũng là một cách thú vị mà Văn ơi!
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    Babycat > 08-10-21, 05:46 AM

    (30-06-21, 03:30 AM)maidinhdan Đã viết:
            If IsEmpty(TuCanToMau) Or TuCanToMau = "" Then

    Thế này ngắn hơn nè bác: 

    Mã:
      If TuCanToMau & "" = "" Then
  • RE: [Demo p2] Tìm kiếm và tô màu cho chữ (như Highlight)

    ledangvan > 06-12-24, 02:53 PM

    (30-06-21, 03:30 AM)maidinhdan Đã viết:
    Hình mình họa, demo thì Post sau, gần 3 giờ sáng rồi.
    Code có 1 dòng và cũng không cần chèn thư viện gì hết, chạy trên mọi địa hình....
    Như Highlight mà không phải  định dạng HightLight nhé: có thể In đậm, nghiêm, gạch dưới.... size to thì chưa thử.... 015

    Hàm Tô màu chữ:
    Mã PHP:
    Public Function HamToMau(Chuoi As StringTuCanToMau 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_Loiva thoat
    End 
    Function 


    Ví dụ 1:
    [Hình: formtim1.jpg]



    Ví dụ 2:
    [Hình: formtim2.jpg]



    Bổ sung Code:
    Mã PHP:
    <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>
    <
    IIn 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>
    <
    TTVăn bản này bằng phông chữ máy đánh chữ một khoảng cách </TT>
    <
    BRVăn bản bình thường với <SUBChỉ số phụ </SUB>
    <
    BRVăn bản bình thường với <SUPSiê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]
    Ai cần Code xin để lại Email

    Cho anh xin code với nhé Maidinhdan, mail của anh là Ledangvan06@gmail.com ; anh cảm ơn nhiều