Chào mừng đến với Diễn đàn Dân Kế Toán - Kế toán tổng hợp thực tế.
Kết quả 1 đến 4 của 4
  1. #1
    Ngày tham gia
    May 2016
    Bài viết
    90

    Xin trợ giúp sự kiện xảy ra trong Combox

    Em có xem qua một chương trình kế toán viết bằng fox và thấy tại trường nhập khách hàng là một combobox, người sử dụng có thể nhập vào một chữ nào đó có chứa trong tên của khách hàng thì combobox sẽ tự động sổ xuống những tên khách hàng có tên chứa chữ cái đó. Em thấy rất hay và muốn áp dụng nó vào chương trình access của mình. Nhưng em chưa biết phải làm thế nào với combobox để làm được như vậy. Nhờ các chuyên gia trên diễn đàn chỉ giáo cho em với.Thanks all

  2. #2
    Ngày tham gia
    Nov 2015
    Bài viết
    0
    Ðề: Xin trợ giúp sự kiện xảy ra trong Combox

    Sao không bạn nào giúp mình với.Chán thật

  3. #3
    Ngày tham gia
    Apr 2016
    Bài viết
    37
    Ðề: Xin trợ giúp sự kiện xảy ra trong Combox

    sao ko ai gup vay

  4. #4
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Ðề: Xin trợ giúp sự kiện xảy ra trong Combox

    1/ Trong combo nó tự động short theo chữ cái đầu của danh sách, chỉ cần gõ là nó hiện ra ngay
    2/ Muốn làm theo tên thì không dùng hộip combo mà dùng một textbox rồi gán sự kiện afterupdate của nó để gọi một hàm tự tạo để tìm kiếm. Hàm tự tạo là hàm tìm một từ trong m,ột chuỗi từ cho trước. Nếu tìm thấy thì cho hiển thị, ngược lại thì không
    Chắc bạn hiểu ý đồ này và vận dụng vào bài của mình
    Thân

    Thôi thì gửi cho bạn cái hàm tự tạo đó. Bạn tùy nghi sử dụng vào mục địch của mình
    Thân


    Mã nguồn PHP:
    [COLOR=#000000]
    [/COLOR][COLOR=#007700]Function [/COLOR][COLOR=#0000BB]TimChuoi[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]ChuoiCon [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String[/COLOR][COLOR=#007700]) As [/COLOR][COLOR=#0000BB]String Dim i [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Long Dim Lm [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Long Dim Lc [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Long Dim Tu [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String Dim Thay [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Boolean Thay [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]False ChuoiMe [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Trim[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe[/COLOR][COLOR=#007700]): [/COLOR][COLOR=#0000BB]ChuoiCon [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Trim[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiCon[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Lm [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Len[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe[/COLOR][COLOR=#007700]): [/COLOR][COLOR=#0000BB]Lc [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Len[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiCon[/COLOR][COLOR=#007700]) For [/COLOR][COLOR=#0000BB]i [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]1 To Lm Tu [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Mid[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]i[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]Lc[/COLOR][COLOR=#007700]) If [/COLOR][COLOR=#0000BB]Tu [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]ChuoiCon Then Thay [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]True[/COLOR][COLOR=#007700]: Exit For [/COLOR][COLOR=#0000BB]Next [/COLOR][COLOR=#007700]If [/COLOR][COLOR=#0000BB]Thay [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]True Then TimChuoi [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]ChuoiMe [/COLOR][COLOR=#007700]Else [/COLOR][COLOR=#0000BB]MsgBox [/COLOR][COLOR=#DD0000]"Khong tim thay" [/COLOR][COLOR=#007700]Exit Function [/COLOR][COLOR=#0000BB]End [/COLOR][COLOR=#007700]If [/COLOR][COLOR=#0000BB]End [/COLOR][COLOR=#007700]Function[/COLOR] 

 

 

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •