Ðề: 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]
Sản phẩm đan lọc được sinh sản và thiết kế dùng cho cả các công trình bể lọc xây dựng mới lẫn các bể lọc hiện hữu. Đan lọc lovense domi giúp tăng khả năng phân phối gió và nước trong quá trình rửa...
Những đặc điểm vượt trội của đan lọc 2 tầng De Nora (8)